| 1234567891011121314151617181920212223242526272829303132333435363738394041424344454647 |
- Listing:
- 1 DEFINITION MODULE StrCnv1;
- 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/strcnv1.dev 1.4 30 Dec 1990 18:04:50 coleb $
- 12 *
- 13 *)
- 14
- 15
- 16 FROM NumTypes IMPORT Real8;
- 17
- 18 PROCEDURE GetEmbeddedCard(TheStr : ARRAY OF
- 19 CHAR; VAR Spot : CARDINAL; VAR TheCard :
- ***** ^ not supported yet
- 20 CARDINAL) : BOOLEAN;
- 21
- 22 PROCEDURE GetEmbeddedInt(TheStr : ARRAY OF CHAR;
- ***** ^ not supported yet
- 23 VAR Spot : CARDINAL; VAR TheInt : INTEGER) :
- 24 BOOLEAN;
- 25
- 26 PROCEDURE GetEmbeddedLongInt(TheStr : ARRAY OF
- 27 CHAR; VAR Spot : CARDINAL; VAR TheLong :
- ***** ^ not supported yet
- 28 LONGINT) : BOOLEAN;
- 29
- 30 PROCEDURE GetEmbeddedReal(TheStr : ARRAY OF
- 31 CHAR; VAR Spot : CARDINAL; VAR TheReal :
- ***** ^ not supported yet
- 32 Real8): BOOLEAN;
- 33
- 34 PROCEDURE Init();
- 35
- 36 END StrCnv1.
- ***** ^ not supported yet
- 5 errors
|
