linux build and fix typo

This commit is contained in:
David Lee 2024-07-06 10:00:38 -07:00
parent 240ab1b0fc
commit 7a3b3a7c69
2 changed files with 6 additions and 1 deletions

View File

@ -137,7 +137,6 @@ BEGIN
movecount := movecount + 1; movecount := movecount + 1;
IF depth >= 4 THEN BEGIN IF depth >= 4 THEN BEGIN
comment winner2 is faster than winner
p := winner2( move ); p := winner2( move );
IF p # 0 THEN BEGIN IF p # 0 THEN BEGIN
IF p = 1 THEN value := 6 IF p = 1 THEN value := 6

View File

@ -0,0 +1,6 @@
str=$(tr '[a-z]' '[A-Z]' <<< $1)
rm $str.OBJ 2>/dev/null
ntvdm -r:. -u algol $str
ntvdm -r:. -u -c -p arun $str.OBJ