seppdroid/Digital-Research-Source-Code
1
0
Fork 0
mirror of https://github.com/SEPPDROID/Digital-Research-Source-Code.git synced 2025-10-26 01:44:21 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Upload

Browse Source 
Digital Research
This commit is contained in:
Sepp J Morris
2020-11-06 18:50:37 +01:00
parent 621ed8ccaf
commit 31738079c4
8481 changed files with 1888323 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

51
CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 & CPM-86 SOURCES/ASM/SYMB.EXT Normal file
View File

@@ -0,0 +1,51 @@
$nolist
/*
modified 7/24/81 R. Silberstein
*/
dcl freept addr external;
DCL END$OF$SYMBTAB ADDR EXTERNAL;
symbterminate: proc external;
end symbterminate;
symbinit: proc external;
end symbinit;
newsymbol: proc(lg,stradr,result) byte external;
dcl lg byte,(stradr,result) addr;
end newsymbol;
newmacro: proc(lg,stradr,macdefpt) byte external;
dcl lg byte,(stradr,macdefpt) addr;
end newmacro;
findsymbol: proc(lg,stradr,result) byte external;
dcl lg byte,(stradr,result) addr;
end findsymbol;
getattributes: proc(symbadr,dest) external;
dcl (symbadr,dest) addr;
end getattributes;
enterattributes: proc(symbadr,source) external;
dcl (symbadr,source) addr;
end enterattributes;
findcodemacro: proc(lg,stradr,result) byte external;
dcl lg byte,(stradr,result) addr;
end findcodemacro;
new$cm$body: PROC(lg,ptr) byte external;
dcl lg byte,ptr addr;
end$proc new$cm$body;
new$cm$name: PROC(lg,asciiptr,returnptr) byte external;
dcl lg byte,(asciiptr,returnptr) addr;
end$proc new$cm$name;
$list