Subversion Repositories Tewi

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
413 nishi 1
$! $Id: build.com 413 2024-11-11 17:25:23Z nishi $
2
$ set def [.Server]
3
$ build_server:
4
$ 	file = f$search("*.c")
5
$ 	if file .eqs. "" then goto quit_server
6
$	write sys$output "Compiling "'file'
7
$	cc 'file'
8
$ goto build_server
9
$ quit_server:
10
$	set def [-]
11
$ exit