Guardian Programmer's Guide

Interfacing With the ERROR Program
Guardian Programmer’s Guide — 421922-014
20 - 3
Opening an ERROR Process
ERROR := PROCESS_CREATE_(OBJFILENAME:OBJFILENAME^LENGTH,
!library^filename:library^file^len!,
!swap^filename:swap^file^len!,
!ext^swap^file^name:ext^swap^len!,
!priority!,
!processor!,
PROCESS^HANDLE,
!error^detail!,
NAME^OPTION,
!name:length!,
PROCESS^DESCR:MAXPDLEN,
PROCESS^DESCR^LEN,
NOWAIT^TAG);
IF ERROR <> 0 THEN ...
.
.
CALL READUPDATEX(RCV^NUM,SBUFFER,RCOUNT,BYTES^READ);
IF <> THEN ...
IF BUFFER[0] = -102 THEN !process create
BEGIN ! completion message
IF BUFFER [13] <> 0 THEN ... !error
ELSE
BEGIN
NOWAIT^TAG := BUFFER[1] FOR 2;
PROCESS^HANDLE ':=' BUFFER[3] FOR 10;
PROCESS^DESCRIPTOR^LENGTH := BUFFER[15];
PROCESS^DESCRIPTOR ':=' BUFFER[20] FOR
PROCESS^DESCRIPTOR^LENGTH;
END;
END;
For more details on creating processes and on the PROCESS_CREATE_ completion
message, refer to Section 16, Creating and Managing Processes.
Opening an ERROR Process
You open an ERROR process as you would any process by passing the process name
or process descriptor to the FILE_OPEN_ procedure:
CALL FILE_OPEN_(PROCESS^NAME:PROCESS^NAME^LENGTH,
PROCESS^FILE^NUMBER);
See Section 2, Using the File System, for details on opening process files.