kay's perl branch

This commit is contained in:
Jeff Hill
1997-04-11 20:44:03 +00:00
parent 8d6deea83d
commit 8013fecb61
24 changed files with 1981 additions and 126 deletions

View File

@@ -30,9 +30,8 @@ include $(TOP)/config/RULES.Host
#
snc.c: snc_lex.c
sncVersion.c: ../Version
$(RM) sncVersion.c
../makeVersion ../Version > sncVersion.c
sncVersion.c: ../Version ../makeVersion.pl
$(PERL) ../makeVersion.pl ../Version sncVersion
clean::
@$(RM) y.output sncVersion.c snc_lex.c snc.c snc.h

View File

@@ -22,6 +22,5 @@ $(PROD): $(OBJS)
$(RM) $@
$(LINK.c) $@ $(OBJS) $(LDLIBS)
seqVersion.c: ../Version
$(RM) seqVersion.c
../makeSeqVersion ../Version > seqVersion.c
seqVersion.c: ../Version ../makeVersion.pl
$(PERL) ../makeVersion.pl ../Version seqVersion

View File

@@ -0,0 +1,22 @@
#!/usr/local/bin/perl
#
# makeVersion - create the snc version module
#
# Usage: perl makeVersion.pl {Version_file} {Symbol Name}
$version_file = $ARGV[0];
$symbol = $ARGV[1];
$out = "$symbol.c";
open IN, $version_file or die "Cannot open $version_file";
$version=<IN>;
chomp $version;
close IN;
$date = localtime();
open OUT, ">$out" or die "Cannot create $out";
print OUT "/* $out - version & date */\n";
print OUT "/* Created by makeVersion.pl */\n";
print OUT "char *$symbol = \"\@(#)SNC/SEQ Version $version : $date\";\n";
close OUT;