Subversion Repositories Tewi

Rev

Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

$! $Id: build.com 413 2024-11-11 17:25:23Z nishi $
$ set def [.Server]
$ build_server:
$       file = f$search("*.c")
$       if file .eqs. "" then goto quit_server
$       write sys$output "Compiling "'file'
$       cc 'file'
$ goto build_server
$ quit_server:
$       set def [-]
$ exit