kay's perl branch
This commit is contained in:
@@ -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
|
||||
|
||||
@@ -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
|
||||
|
||||
22
src/sequencer/makeVersion.pl
Normal file
22
src/sequencer/makeVersion.pl
Normal 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;
|
||||
Reference in New Issue
Block a user