add a compatible sync command

This commit is contained in:
Oliver Lehmann 2008-06-08 09:00:00 +00:00
parent c36e308775
commit 41a18aef39
3 changed files with 46 additions and 1 deletions

View File

@ -1,5 +1,9 @@
CAS= cas
CC= cc
LD= ld
FILES= getud putud
STRIPFILES= copydisk dump dumpdir format restor tar verify
STRIPFILES= copydisk dump dumpdir format restor sync tar verify
all: $(FILES) $(STRIPFILES) strip
@ -8,3 +12,9 @@ strip:
clean:
rm -f $(FILES) $(STRIPFILES)
compat1crt.o: compat1crt.s
$(CAS) -u -o $@ $*.s
sync: compat1crt.o sync.o
$(LD) -o $@ -e start compat1crt.o sync.o -lc

28
WEGA/src/cmd/compat1crt.s Normal file
View File

@ -0,0 +1,28 @@
.comm 2, _environ;
.code
start::
{
jr foo
.byte "......1981 87wega3.2."
.byte %00
foo:
ld r7,@r15
lda r6,%0000+2(r15)
ld r2,@r6
clr %0000-2(r2)
ld r5,r6
subl rr0,rr0
cpir r0,@r5,r1,eq
cp r5,r2
jr ult,_foo
dec r5,#2
_foo:
ld _environ,r5
call _main
ld r7,r2
call __callex
sc #1
}
.data
. = .+2

7
WEGA/src/cmd/sync.c Normal file
View File

@ -0,0 +1,7 @@
char whatstr[] = "@[$]sync.c 1.2 07/24/82 03:16:45 - 87wega3.2";
main()
{
sync();
exit(0);
}