Skip to content

Commit 16bc0f4

Browse files
committed
mg_names.c -> mg_names.inc
1 parent 23fd77c commit 16bc0f4

File tree

4 files changed

+5
-5
lines changed

4 files changed

+5
-5
lines changed

MANIFEST

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -4385,7 +4385,7 @@ META.json Distribution meta-data in JSON
43854385
META.yml Distribution meta-data in YAML
43864386
mg.c Magic code
43874387
mg.h Magic header
4388-
mg_names.c Generated magic names used by dump.c
4388+
mg_names.inc Generated magic names used by dump.c
43894389
mg_raw.h Generated magic data used by generate_uudmap.c
43904390
mg_vtable.h Generated magic vtable data
43914391
miniperlmain.c Basic perl w/o dynamic loading or extensions

dump.c

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1116,7 +1116,7 @@ Perl_gv_dump(pTHX_ GV *gv)
11161116
*/
11171117

11181118
static const struct { const char type; const char *name; } magic_names[] = {
1119-
#include "mg_names.c"
1119+
#include "mg_names.inc"
11201120
/* this null string terminates the list */
11211121
{ 0, NULL },
11221122
};

mg_names.c renamed to mg_names.inc

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
/* -*- buffer-read-only: t -*-
22
*
3-
* mg_names.c
3+
* mg_names.inc
44
* !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
55
* This file is built by regen/mg_vtable.pl.
66
* Any changes made here will be lost!

regen/mg_vtable.pl

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22
#
33
# Regenerate (overwriting only if changed):
44
#
5-
# mg_names.c
5+
# mg_names.inc
66
# mg_raw.h
77
# mg_vtable.h
88
# pod/perlguts.pod
@@ -155,7 +155,7 @@ BEGIN
155155
my ($vt, $raw, $names) = map {
156156
open_new($_, '>',
157157
{ by => 'regen/mg_vtable.pl', file => $_, style => '*' });
158-
} 'mg_vtable.h', 'mg_raw.h', 'mg_names.c';
158+
} 'mg_vtable.h', 'mg_raw.h', 'mg_names.inc';
159159
my $guts = open_new("pod/perlguts.pod", ">");
160160

161161
print $vt <<'EOH';

0 commit comments

Comments
 (0)