Added Maclisp
Fixes: #567 Co-Authored-By: Lars Brinkhoff <lars.spam@nocrew.org>
This commit is contained in:
@@ -355,6 +355,7 @@ Meet [FizzBuzz](https://github.com/zenware/FizzBuzz), the evolution of [hello-wo
|
||||
* [Lsl](l/lsl.lsl)
|
||||
* [Lua](l/lua.lua)
|
||||
* [M4](m/m4.m4)
|
||||
* [Maclisp](m/maclisp.lisp)
|
||||
* [Macsyma](m/macsyma.mac)
|
||||
* [Magic](m/magic)
|
||||
* [Make](m/make.makefile)
|
||||
|
||||
12
m/maclisp.lisp
Normal file
12
m/maclisp.lisp
Normal file
@@ -0,0 +1,12 @@
|
||||
(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))
|
||||
Reference in New Issue
Block a user