Maclisp hello world

[larsbrinkhoff]

Short document on how to write a hello world program in Maclisp.

Maybe first interpreted, then all the way to a compiled application.

Debugging tips from @eswenson1:

• load COMPLR
• Type ^G
• (load "liblsp;dbg fasl")
• (debug t)
• (maklap)

Then, assuming it does the same thing and you don't get a prompt and it won't compile anything:

• type ^B (to force a breakpoint)
• type (debug) (to enter the debugger)
• look around (v will give a nice backtrace, e will evaluate expressions, u/d to move up/down stack, ? for help).

[larsbrinkhoff]

Add info on LEDIT? (Maybe LISPT too, but it doesn't seem so useful at this point.)

[larsbrinkhoff]

I wrote a hello world here: leachim6/hello-world#567

(comment) ;-*- Lisp -*-
(progn
  (defun hello-world ()
    (princ "Hello World!")
    (quit))
  (close (prog1 infile (inpush -1)))
  (sstatus feature noldmsg)
  (gctwa)
  (gc)
  (sstatus flush t)
  (suspend ":KILL " '(ts hello))
(hello-world))

[larsbrinkhoff]

@netsettler suggests linking from http://maclisp.info to information about running ITS and Maclisp. We do not yet have any good introductory text for Maclisp.

[larsbrinkhoff]

The maclisp.info link is now there. That's an additional reason to have a nice beginner friendly text.

[larsbrinkhoff]

I suggest a hello world intro text with this code.

(defun hello ()
  (princ "Hello Maclisp!")
  (terpri)
  (quit))

And to dump out an executable program.

(comment)
(progn
  (close (prog1 infile (inpush -1)))
  (fasload hello)
  (gc)
  (purify 0 0 'bporg)
  (sstatus flush t)
  (suspend ":kill " '(ts hello))
  (hello))

Plus appropriate text to explain everything, of course.

I'm not sure about calling (sstatus toplevel something). I think the standard REPL can be retained for this simple example.

[larsbrinkhoff]

I'm taking this opportunity to add a HELLO directory with examples for Lisp, Mudde, Midas, and CLU.

[larsbrinkhoff]

My main intent here was to add a small hello world for Maclisp. I'll happily take suggestions for a more elaborate introductory text, if you have any. If not, it can be added another time.