projects
/
rocksndiamonds.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
renamed variable
[rocksndiamonds.git]
/
build-scripts
/
create_element_defs.pl
diff --git
a/build-scripts/create_element_defs.pl
b/build-scripts/create_element_defs.pl
index db4d42a9e806107b4e9a63d3832afae8b1727920..91ea130d0d17936001cca82b5fe0c7ac4332d59b 100755
(executable)
--- a/
build-scripts/create_element_defs.pl
+++ b/
build-scripts/create_element_defs.pl
@@
-243,12
+243,12
@@
sub print_file_header
close FILE;
print "\n";
close FILE;
print "\n";
- print "/
* ----- $text_auto ----- */
\n";
+ print "/
/ ------- $text_auto -------
\n";
print "\n";
print "#ifndef $filename_def\n";
print "#define $filename_def\n";
print "\n";
print "\n";
print "#ifndef $filename_def\n";
print "#define $filename_def\n";
print "\n";
- print "/
* $comment */
\n";
+ print "/
/ $comment
\n";
print "\n";
}
print "\n";
}
@@
-259,7
+259,7
@@
sub print_file_footer
$filename_def =~ s/\./_/;
print "\n";
$filename_def =~ s/\./_/;
print "\n";
- print "#endif /
* $filename_def */
\n";
+ print "#endif /
/ $filename_def
\n";
}
sub get_tabs
}
sub get_tabs
@@
-1074,7
+1074,7
@@
sub get_known_action_definitions
chomp; # cut trailing newline
# process line with action definition
chomp; # cut trailing newline
# process line with action definition
- if (/^
\#define ACTION_([A-Z0-9_]+)\s
/)
+ if (/^
ACTION_([A-Z0-9_]+)[, ]
/)
{
$known_action{$1} = 1;
{
$known_action{$1} = 1;
@@
-1101,7
+1101,7
@@
sub get_known_special_arg_definitions
chomp; # cut trailing newline
# process line with special arg definition
chomp; # cut trailing newline
# process line with special arg definition
- if (/^
\#define GFX_SPECIAL_ARG_([A-Z0-9_]+)\s
/)
+ if (/^
GFX_SPECIAL_ARG_([A-Z0-9_]+)[, ]
/)
{
if ($1 eq 'CRUMBLED')
{
{
if ($1 eq 'CRUMBLED')
{
@@
-1160,7
+1160,7
@@
sub get_known_font_definitions
chomp; # cut trailing newline
# process line with font definition
chomp; # cut trailing newline
# process line with font definition
- if (/^
\#define (FONT_[A-Z0-9_]+)\s
/)
+ if (/^
(FONT_[A-Z0-9_]+)[, ]
/)
{
$known_font{$1} = 1;
{
$known_font{$1} = 1;
@@
-1573,7
+1573,7
@@
sub print_element_to_graphic_list
{
print_element_to_graphic_entry($element_without_action,
$gfx_action,
{
print_element_to_graphic_entry($element_without_action,
$gfx_action,
-
'-1'
,
+
$gfx_direction
,
$gfx_crumbled,
$graphic);
}
$gfx_crumbled,
$graphic);
}