home *** CD-ROM | disk | FTP | other *** search
Modula Definition | 1986-11-21 | 486 b | 26 lines |
- (*
- This module can be used to display an error on top
- of a screen. All you have to do to use it is to
- pass an error string and a Screen pointer.
-
- Created: 9/17/87 by Richie Bielak
-
- Modified:
-
- Copyright © 1987 by Richie Bielak
-
- This program maybe freely copied, but please leave my
- name in. Thanks.....Richie
-
-
- *)
- DEFINITION MODULE ShowError;
-
- FROM Intuition IMPORT ScreenPtr;
-
- (* $D- *)
- PROCEDURE Error (sp : ScreenPtr; text : ARRAY OF CHAR);
- (* $D+ *)
-
- END ShowError.
-