slederer/Tridora-CPU
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages 3 Wiki Activity Actions

stdlib: add nointr procedure

Browse source 
stdlib: give PExec2 and PExec3 more sensible names

pcomp: increase heap size
This commit is contained in:
slederer 2025-02-02 01:18:01 +01:00
parent b0c4b664f2
commit c779cd0d3f
4 changed files with 22 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/stdlib.inc
View file

@ -240,6 +240,7 @@ procedure freadreal(var v:real;var f:file); external;
procedure openchannel(name:filenamestr; var f:file; mode:filemode; var error:integer); external;
procedure open(var f:file; name:pathnamestr; mode: filemode); external;
procedure noecho(var f:file; noecho:boolean; var old:boolean); external;
procedure nointr(var f:file; aBool:boolean; var old:boolean); external;
procedure intstr(v:integer; fieldWith:integer; var rbuf:string);
external;
@ -269,8 +270,8 @@ procedure TextDefault; external;
procedure PTerm; external; (* from runtime.s *)
procedure PExec(prgfile:pathnamestr; var args:PArgVec; argCount:integer;var error:integer); external;
procedure PExec2(prgfile:pathnamestr; arg1:string; var error:integer); external;
procedure PExec3(prgfile:pathnamestr; arg1, arg2:string; var error:integer); external;
procedure PExec1(prgfile:pathnamestr; arg1:string; var error:integer); external;
procedure PExec2(prgfile:pathnamestr; arg1, arg2:string; var error:integer); external;
function ParamStr(i:integer):string; external;
function ParamCount():integer; external;