| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758 |
- Listing:
- 1 DEFINITION MODULE Diagnostics;
- 2 (*
- 3 * REPERTOIRE
- 4 * Release 1.6
- 5 * By Charles Bradford and Cole Brecheen
- 6 * (c) Copyright 1985-1992 PMI
- 7 * Green Bay, Wisconsin
- 8 * All rights reserved
- 9 * (414) 468-6040
- 10 *
- 11 * $Header: D:/logfiles/defs/diagnost.dev 1.4 30 Dec 1990 17:59:38 coleb $
- 12 *
- 13 *)
- 14
- 15
- 16 FROM GenLists IMPORT GenList;
- 17 FROM SYSTEM IMPORT ADDRESS;
- 18
- 19 PROCEDURE diagA(str1 : ARRAY OF CHAR; TheAddr :
- ***** ^ not supported yet
- 20 ADDRESS );
- 21
- 22 PROCEDURE diagB( str1: ARRAY OF CHAR; TheSet:
- ***** ^ not supported yet
- 23 BITSET );
- ***** ^ undeclared identifier
- 24
- 25 PROCEDURE diagS(str1, str2 : ARRAY OF CHAR);
- ***** ^ not supported yet
- 26
- 27 PROCEDURE diagC(str1 : ARRAY OF CHAR; TheCard :
- ***** ^ not supported yet
- 28 CARDINAL);
- 29
- 30 PROCEDURE diagI(str1 : ARRAY OF CHAR; TheInt :
- ***** ^ not supported yet
- 31 INTEGER);
- 32
- 33 PROCEDURE diagL(str1 : ARRAY OF CHAR; TheLong :
- ***** ^ not supported yet
- 34 LONGINT);
- 35
- 36 PROCEDURE diagBlock( str1 : ARRAY OF CHAR;
- ***** ^ not supported yet
- 37 TheAddr : ADDRESS; TheSize: CARDINAL );
- 38
- 39 PROCEDURE CheckList( TheList: GenList );
- 40
- 41 PROCEDURE Init();
- 42
- 43 END Diagnostics.
- ***** ^ not supported yet
- 9 errors
|