From bdcd276bf88ba5487a02a49a21965a8132afa6e6 Mon Sep 17 00:00:00 2001 From: David Lee Date: Wed, 24 Jul 2024 07:04:43 -0700 Subject: [PATCH] linux build --- Microsoft COBOL v21/m.bat | 2 +- Microsoft COBOL v21/m.sh | 11 +++++++++++ 2 files changed, 12 insertions(+), 1 deletion(-) create mode 100644 Microsoft COBOL v21/m.sh diff --git a/Microsoft COBOL v21/m.bat b/Microsoft COBOL v21/m.bat index cdfc966..749d96c 100644 --- a/Microsoft COBOL v21/m.bat +++ b/Microsoft COBOL v21/m.bat @@ -1,7 +1,7 @@ del %1.obj 2>nul del %1.exe 2>nul -ntvdm -t -r:. -h -c -d cobol %1,%1,%1/D; +ntvdm -r:. -h -c -d cobol %1,%1,%1/D; ntvdm -c runcob %1 echo: diff --git a/Microsoft COBOL v21/m.sh b/Microsoft COBOL v21/m.sh new file mode 100644 index 0000000..f512496 --- /dev/null +++ b/Microsoft COBOL v21/m.sh @@ -0,0 +1,11 @@ +str=$(tr '[a-z]' '[A-Z]' <<< $1) + +rm $str.INT 2>/dev/null +rm $str.LST 2>/dev/null + +ntvdm -u -r:. -h -c -d COBOL $str,$str,$str/D\; + +rm $str.LST 2>/dev/null + +ntvdm -u -r:. -c RUNCOB $str +echo