develooper Front page | perl.perl5.porters | Postings from July 2003

[PATCH] LotR quote for perlapi.c

Thread Next
From:
Autrijus Tang
Date:
July 31, 2003 18:59
Subject:
[PATCH] LotR quote for perlapi.c
Message ID:
20030801020029.GA28241@not.autrijus.org
Except for perlapi.c, every other *.c files have its own Tolkien quote
(the one for perly.c resides in perly.y), so it seems appropriate to 
fix this.

This is not the first .pl file that generates Tolkien comments in .c
files: reentrl.pl also does it for reentr.c.

Thanks,
/Autrijus/

--- embed.pl.orig	Fri Aug  1 09:19:43 2003
+++ embed.pl	Fri Aug  1 09:56:19 2003
@@ -55,6 +55,15 @@
 
 EOW
 
+    $warning .= <<EOW if $file eq 'perlapi.c';
+
+Up to the threshold of the door there mounted a flight of twenty-seven
+broad stairs, hewn by some unknown art of the same black stone.  This
+was the only entrance to the tower.
+
+
+EOW
+
     if ($file =~ m:\.[ch]$:) {
 	$warning =~ s:^: * :gm;
 	$warning =~ s: +$::gm;

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About