| 12345678910111213141516171819202122232425262728293031 |
- Listing:
- 1 (*# check(stack=>off,
- 2 index=>off,
- 3 range=>off,
- 4 overflow=>off,
- 5 nil_ptr=>off) *)
- 6 IMPLEMENTATION MODULE WDLLMod;
- 7
- 8 PROCEDURE MessagePaint(hdc: Windows.HDC; szMessage: ARRAY OF CHAR; MessageLength: CARDINAL);
- ***** ^ undeclared identifier
- ***** ^ not supported yet
- ***** ^ not supported yet
- 9
- 10 BEGIN
- 11 IF Windows.TextOut(hdc, 10, 10, szMessage, MessageLength ) # 0 THEN END;
- ***** ^ undeclared identifier
- ***** ^ not supported yet
- ***** ^ not supported yet
- ***** ^ not supported yet
- ***** ^ not supported yet
- 12 END MessagePaint;
- ***** ^ not supported yet
- 13
- 14
- 15 END WDLLMod.
- ***** ^ not supported yet
- 10 errors
|