linux build
This commit is contained in:
parent
8056422ad3
commit
f0f865ac2b
@ -1,4 +1,4 @@
|
|||||||
@echo off
|
@echo off
|
||||||
setlocal
|
setlocal
|
||||||
|
|
||||||
ntvdm -r:. -t qpl %1.pas
|
ntvdm -r:. qpl %1.pas
|
||||||
|
7
Microsoft QuickPascal v1/m.sh
Normal file
7
Microsoft QuickPascal v1/m.sh
Normal file
@ -0,0 +1,7 @@
|
|||||||
|
str=$(tr '[a-z]' '[A-Z]' <<< $1)
|
||||||
|
|
||||||
|
rm $str.EXE 2>/dev/null
|
||||||
|
|
||||||
|
ntvdm -u -r:. qpl $str.pas
|
||||||
|
|
||||||
|
ntvdm -r:. -u -p $str
|
Loading…
Reference in New Issue
Block a user