ForthNet@willett.UUCP (ForthNet articles from GEnie) (01/06/90)
Date: 01-04-90 (18:11) Number: 2751 (Echo) To: ALL Refer#: NONE From: ZAFAR ESSAK Read: (N/A) Subj: TCOM SLAYS GIANT Status: PUBLIC MESSAGE Here's a reply to my previous message for help with Tom Zimmer's TCOM target compiler creating "small" applications that gobble up huge amounts of RAM. How's that saying go? When all else fails read the examples. Sure enough Tom provides an example of initializing a target application to use the minimum amount of RAM. The following is taken from his SHELL example in case anyone else is interested. : main ( -- ) \ the main entry point for the program DECIMAL \ always select decimal INIT-CURSOR \ get intial cursor shape 50 FUDGE ! \ init MS timer, GUESS!! CAPS ON \ ignore cAsE ?DS: SSEG ! \ init search segment DOSIO_INIT \ init EMIT, TYPE & SPACES here 500 + dup sp0 ! sp! here 700 + dup rp0 ! rp! here 750 + negate paragraph negate ADJ_MEMORY DOS_TO_TIB \ move command tail to TIB COMSPEC_INIT \ init command specification vmode.set . . bye ; \ after setting stacks, you \ can't just terminate, you \ must use bye. So there it is. --- * Via Qwikmail 2.01 NET/Mail : British Columbia Forth Board - Burnaby BC - (604)434-5886 ----- This message came from GEnie via willett through a semi-automated program. Report problems to: 'uunet!willett!dwp' or 'willett!dwp@gateway.sei.cmu.edu'