DataMuseum.dk

top - metrics - download

    Length: 4224 (0x1080)
    Types: TextFile
    Names: »PLMUDI.EXT«

└─⟦925c9ba19⟧ Bits:30002876 RMX Emulator - Intel SW Collection
    └─⟦this⟧ »PLM86\PLMUDI.EXT« 

TextFile

	/*
	 *
	 *	PL/M-86 external declarations for iRMX 86 UDI primitives.
	 *	NLA/ 83.30.11
	 */

$SAVE
$NOLIST

dq$allocate: PROCEDURE( size, except$p ) WORD EXTERNAL;
DECLARE
	size WORD, except$p POINTER;
END dq$allocate;

dq$attach: PROCEDURE( path$p, except$p ) WORD EXTERNAL;
DECLARE
	( path$p, except$p ) POINTER;
END dq$attach;

dq$change$access: PROCEDURE( path$p, user, access, except$p ) EXTERNAL;
DECLARE
	path$p POINTER, ( user, access ) BYTE, except$p POINTER;
END dq$change$access;

dq$change$extension: PROCEDURE( path$p, ext$p, except$p ) EXTERNAL;
DECLARE
	( path$p, ext$p, except$p ) POINTER;
END dq$change$extension;

dq$close: PROCEDURE( conn, except$p ) EXTERNAL;
DECLARE
	conn WORD, except$p POINTER;
END dq$close;

dq$create: PROCEDURE( path$p, except$p ) WORD EXTERNAL;
DECLARE
	( path$p, except$p ) POINTER;
END dq$create;

dq$decode$exception: PROCEDURE( e$code, ec$p, except$p ) EXTERNAL;
DECLARE
	e$code WORD, ( ec$p, except$p ) POINTER;
END dq$decode$exception;

dq$decode$time: PROCEDURE( time$p, except$p ) EXTERNAL;
DECLARE
	( time$p, except$p ) POINTER;
END dq$decode$time;

dq$delete: PROCEDURE( path$p, except$p ) EXTERNAL;
DECLARE
	( path$p, except$p ) POINTER;
END dq$delete;

dq$detach: PROCEDURE( conn, except$p ) EXTERNAL;
DECLARE
	conn WORD, except$p POINTER;
END dq$detach;

dq$exit: PROCEDURE( c$code ) EXTERNAL;
DECLARE
	c$code WORD;
END dq$exit;

dq$file$info: PROCEDURE( conn, mode, file$info$p, except$p ) EXTERNAL;
DECLARE
	conn WORD, mode BYTE, ( file$info$p, except$p ) POINTER;
END dq$file$info;

dq$free: PROCEDURE( seg, except$p ) EXTERNAL;
DECLARE
	seg WORD, except$p POINTER;
END dq$free;

dq$get$argument: PROCEDURE( arg$p, except$p ) BYTE EXTERNAL;
DECLARE
	( arg$p, except$p ) POINTER;
END dq$get$argument;

dq$get$connection$status: PROCEDURE( conn, info$p, except$p ) EXTERNAL;
DECLARE
	conn WORD, ( info$p, except$p ) POINTER;
END dq$get$connection$status;

dq$get$exception$handler: PROCEDURE( c$han$p, except$p ) EXTERNAL;
DECLARE
	( c$han$p, except$p ) POINTER;
END dq$get$exception$handler;

dq$get$size: PROCEDURE( seg, except$p ) WORD EXTERNAL;
DECLARE
	seg WORD, except$p POINTER;
END dq$get$size;

dq$get$system$id: PROCEDURE( id$p, except$p ) EXTERNAL;
DECLARE
	( id$p, except$p ) POINTER;
END dq$get$system$id;

dq$get$time: PROCEDURE( dt$p, except$p ) EXTERNAL;
DECLARE
	( dt$p, except$p ) POINTER;
END dq$get$time;

dq$open: PROCEDURE( conn, mode, num$buf, except$p ) EXTERNAL;
DECLARE
	conn WORD, ( mode, num$buf ) BYTE, except$p POINTER;
END dq$open;

dq$overlay: PROCEDURE( name$p, except$p ) EXTERNAL;
DECLARE
	( name$p, except$p ) POINTER;
END dq$overlay;

dq$read: PROCEDURE( conn, buf$p, count, except$p ) WORD EXTERNAL;
DECLARE
	conn WORD, buf$p POINTER, count WORD, except$p POINTER;
END dq$read;

dq$rename: PROCEDURE( old$p, new$p, except$p ) EXTERNAL;
DECLARE
	( old$p, new$p, except$p ) POINTER;
END dq$rename;

dq$reserve$io$memory: PROCEDURE( no$of$files, no$of$buffers, except$p ) EXTERNAL;
DECLARE
	( no$of$files, no$of$buffers ) WORD, except$p POINTER;
END dq$reserve$io$memory;

dq$seek: PROCEDURE( conn, mode, high$offset, low$offset, excep$p ) EXTERNAL;
DECLARE
	conn			WORD,
	mode			BYTE,
	( high$offset,
	low$offset )	WORD,
	excep$p			POINTER;
END dq$seek;

dq$special: PROCEDURE( mode, param$p, except$p ) EXTERNAL;
DECLARE
	mode BYTE, ( param$p, except$p ) POINTER;
END dq$special;

dq$switch$buffer: PROCEDURE( buff$p, except$p ) WORD EXTERNAL;
DECLARE
	( buff$p, except$p ) POINTER;
END dq$switch$buffer;

dq$trap$cc: PROCEDURE( cc$routine$p, except$p ) EXTERNAL;
DECLARE
	( cc$routine$p, except$p ) POINTER;
END dq$trap$cc;

dq$trap$exception: PROCEDURE( han$p, except$p ) EXTERNAL;
DECLARE
	( han$p, except$p ) POINTER;
END dq$trap$exception;

dq$truncate: PROCEDURE( conn, except$p ) EXTERNAL;
DECLARE
	conn WORD, except$p POINTER;
END dq$truncate;

dq$write: PROCEDURE( conn, buf$p, count, except$p ) EXTERNAL;
DECLARE
	conn WORD, buf$p POINTER, count WORD, except$p POINTER;
END dq$write;


$RESTORE
$LIST
«eof»