*** empty log message ***

This commit is contained in:
hyung-hwan 2006-02-18 16:14:14 +00:00
parent 71910552be
commit 46f163c633
2 changed files with 21 additions and 261 deletions

File diff suppressed because one or more lines are too long

View File

@ -1,33 +1,25 @@
$ write sys$output "cc/define=__STAND_ALONE awk.c" $ xxx:
$ cc/define=__STAND_ALONE awk.c
$
$ write sys$output "cc/define=__STAND_ALONE parse.c"
$ cc/define=__STAND_ALONE parse.c
$
$ write sys$output "cc/define=__STAND_ALONE tree.c"
$ cc/define=__STAND_ALONE tree.c
$
$ write sys$output "cc/define=__STAND_ALONE sa.c"
$ cc/define=__STAND_ALONE sa.c
$
$ write sys$output "lib/create xpawk awk,parse,tree,sa"
$ lib/create xpawk awk,parse,tree,sa
$ objs := awk,hash,tab,tree,parse,sa
$ $
$ loop: $ names := awk,hash,tab,tree,parse,sa
$ file =
$ if file .ne. ""
$ then
$ gosub compile $ gosub compile
$ goto loop $ gosub archive
$ endif
$
$ exit $ exit
$ $
$ compile: $ compile:
$ write sys$output "awk.c" $ num = 0
$ compile_loop:
$ name = f$element(num,",",names)
$ if name .eqs. "," then return
$ gosub compile_file
$ num = num + 1
$ goto compile_loop
$
$ compile_file:
$ write sys$output "Compiling ''name'.c..."
$ cc/define=__STAND_ALONE 'name'
$ return $ return
$
$ archive:
$ write sys$output "Creating library..."
$ lib/create xpawk 'names'