home *** CD-ROM | disk | FTP | other *** search
- .message_filename
- ╨2 equs "<PlaceItRes$Dir>.Messages"+╜0
- ╒.message_file_open
- ┌ equb 0
- ▀ align
- Σ.lmf_block
- Θ equd 0
- ε equd 0
- ≤ equd 0
- ° equd 0
- ²
- S; -----------------------------------------------------------------------------
- +; look up a message in the message file
- ; entry
- ; r1 -> token
- 3; / 0 => don't copy the message out
- / 1 => copy the message into poll space
- 2; r2 \ 2 => message into poll space+4
- %/; \ >2 => copy the message at r2
- *6; r3 = length of free memory at r2 if r2 > 2
- /;
- 4H; r2 = 2 is used during fatal error and report error
- 9$;