News for hackers. Stuff that matters.
Re:Lisp in about 200 lines of Ruby by gord on Sunday November 08, 2009 @05:22PM (#929911)
This makes me vocalize something Ive wondered about...

Whats the smallest subset of lisp which you need to implement in order to bootstrap the language? So, given this small subset, one can implement the rest of say scheme or common lisp or arc on top of.

I vaguely recall Sussman or Ebelson implementing car and cadr in terms of lambdas, for example.

It seems this should be quite modular, given so many implementations of lisp [ in javascript, PHP, etc now Ruby ]. So that new lisps might be easily brought up over this kernel.

Re:Lisp in about 200 lines of Ruby by fadmmatt on Sunday November 08, 2009 @06:25PM (#930026)
The lambda calculus is Turing-complete, so the following language is sufficient to encode any computable function:

exp ::= var | (lambda (var) exp) | (exp exp)

Check out

http://matt.might.net/articles/church-encodings-demo-in-sche...

To see how to build numbers, booleans, lists, conditionals and recursion out of pure lambdas.

Even cooler is that these tricks work in languages like JavaScript too:

http://matt.might.net/articles/implementation-of-recursive-f...

Re:Lisp in about 200 lines of Ruby by twilightsentry on Sunday November 08, 2009 @05:58PM (#929967)
Well, you can define pairs like this (as long as you've got lexical scope):

  (setq cons (lambda (x xs)
               (lambda (msg)
                 (if (eq msg 'car) x xs)))

  (setq car (lambda (xs) (xs 'car)))
  (setq cdr (lambda (xs) (xs 'cdr)))
That only uses 'setq, 'lambda, 'if, 'eq, and quoted symbols. That pretty much gives you the untyped lambda calculus, plus some side effects. Throw in the appropriate macros and you've got the core of Scheme and Arc, without any I/O or efficient data representations.

You can take this pretty far. Essentially, you just need 'lambda and application. You could use church numerals for numbers, monads for side effects, the y-combinator for recursion, etc.

Re:Lisp in about 200 lines of Ruby by mahmud on Monday November 09, 2009 @09:26AM (#930928)
Under which lisp implementation do those forms work?

The definitions for CAR and CDR are identical and they don't make much sense (set the symbol 'car to the value of a function that takes angument xs, which is a function, and applies that to the symbol 'car)

And the definition for CONS is equally opaque.

How would you use those functions, CONS, CAR and CDR?

Since you pretty much nailed the uses of church numerals, monads and the y-combinator, I know you know what you're talking about, it just that Lisp's semantics is confusing me (it has common lisp keyword SETQ but none of its behavior)

Re:Lisp in about 200 lines of Ruby by twilightsentry on Monday November 09, 2009 @02:14PM (#931530)
Oops; I meant to write those in CL, but I forgot about functions having their own namespace (been playing too long in a lisp-1). It should work in CL if you use FUNCALL.

If mquander's explanation isn't enough, you might look at it using terms from the OO world: CAR takes a pair object and calls its 'car method.

Re:Lisp in about 200 lines of Ruby by mahmud on Monday November 09, 2009 @10:42PM (#932396)
So you mean a meta-circular OOP implementation, where the hosting language already has car, cdr and cons. Alright.

I thought what you wrote was supposed to be a primitive implementation of the functions.

Re:Lisp in about 200 lines of Ruby by twilightsentry on Saturday November 14, 2009 @07:32PM (#942397)
No, not really, unless you're running the code in a metacircular interpreter.

Imagine encoding the pair ('hello . 'world) into a function. You might say:

  (lambda (msg)
    (if (eq msg 'car) 'hello 'world))
You could get 'hello by applying that function to the 'car symbol, or 'world by applying it to anything else. Wrapping that in another function lets us generalise to any CAR/CDR.

  (lambda (car-value cdr-value)
    (lambda (msg)
      (if (eq msg 'car) car-value cdr-value)))
Re:Lisp in about 200 lines of Ruby by mquander on Monday November 09, 2009 @10:05AM (#930990)
Those look correct to me. The function returned by cons is just a switch that holds two values in a closure, and interprets what you pass it as a signal to determine which to retrieve. You could just as easily rewrite it to pass it 0 or 1 instead of car and cdr.

If you evaluate (car (cons 1 2)) and (cdr (cons 1 2)) on paper using substitution, you'll see how it works.

Re:Lisp in about 200 lines of Ruby by dkersten on Monday November 09, 2009 @11:46AM (#931217)
Exactly. SICP shows some similar code, though I don't remember which part..
Re:Lisp in about 200 lines of Ruby by silentbicycle on Sunday November 08, 2009 @07:24PM (#930089)
http://www.c2.com/cgi/wiki?ImplementingLisp

Pair-structured memory, a (very simple) recursive-descent parser, eval, apply, read, print, a few mathematical primitives, not too much else. Once you have the bare bones, _The Art of the Interpreter_ provides a good skeleton. Don't worry about a garbage collector yet - either use a language with one (Scheme, Python, Lua, Ruby, OCaml, etc.) or just let it leak memory for now. (Garbage collectors aren't deep magic either, but one thing at a time, you know?)

Implementing a toy Lisp is absolutely worthwhile. It shouldn't take too long* , and it will teach you several deep things. Don't worry about making it efficient until you have it together enough to be useful. (If you want a mini language that's mature, just use Lua.) This is about discovery. Many interpreters for mini-languages don't need to be efficient, anyway. Who writes 20,k-long files in a DSL?

* Though if you've never done an interpreter at all, a half-assed Forth is even simpler. Either way, implementing half-assed Lisps, Prologs, Js, etc. is a great way to feel out a language. Worrying about getting it efficient upfront can be a red herring.

Re:Lisp in about 200 lines of Ruby by mdemare on Sunday November 08, 2009 @05:54PM (#929961)
According to pg, seven: (quote, atom, eq, car, cdr, cons, and cond)

Eighth paragraph: http://www.paulgraham.com/ilc03.html

Re:Lisp in about 200 lines of Ruby by jmatt on Monday November 09, 2009 @05:38AM (#930700)
Ya that should be the minimum required to bootstrap. I always thought the definitive minimum code for lisp was here:

http://lib.store.yahoo.net/lib/paulgraham/jmc.lisp

Or at least from a historic perspective.

Re:Lisp in about 200 lines of Ruby by onewland on Sunday November 08, 2009 @06:55PM (#930053)
Quote as a predefined macro could be important though, in a Lisp, if you expect to be doing a lot of macro magic, and I don't see it here.

This is cool, though, and very readable; I know what all the code is doing with a quick glance. Cheers to the author.

Re:Lisp in about 200 lines of Ruby by procrastitron on Sunday November 08, 2009 @05:57PM (#929965)
Well, lambda calculus is Turing complete, so you could just stick with a call-by-value version of that. However, you'd want to add macros if you wanted to extend the syntax of the language. Since you mentioned car and cdr in lambdas, they'd be defined like this:

NIL = (lambda (x) (lambda (y) y))

CONS = (lambda (ar) (lambda (dr) (lambda (op) (op ar dr))))

CAR = (lambda (expr) (expr (lambda (ar dr) ar)))

CDR = (lambda (expr) (expr (lambda (ar dr) dr)))

Re:Lisp in about 200 lines of Ruby by sb on Monday November 09, 2009 @07:30AM (#930777)
Since nobody mentioned it, there is a very interesting paper among what are know the "lambda papers":

http://library.readscheme.org/page1.html

What you are looking for is answered in "The Art of the Interpreter, the Modularity Complex (Part Zero, One, and Two)", Steele and Sussman, MIT AI Lab Memo 453, May 1978.

http://repository.readscheme.org/ftp/papers/ai-lab-pubs/AIM-...

More LISP details can be obtained by the book "LISP in Small Pieces" by Christian Queinnec (1996), and an excellent description of the eval/apply functions can be found in "The Architecture of Symbolic Computers" by Peter M. Kogge, 1990.

Btw: to satisfy my more or less latent pedantism: The second SICP author is called Abelson not Ebelson.

Re:Lisp in about 200 lines of Ruby by jacquesm on Sunday November 08, 2009 @07:02PM (#930060)
hehe, I had this open two tabs to the left of HN :)

http://www.faqs.org/faqs/lisp-faq/part1/section-6.html

Re:Lisp in about 200 lines of Ruby by gord on Sunday November 08, 2009 @07:53PM (#930127)
Nice link.

Frustrating to have to login to ACM to read McCarthys - 'A micro-manual for LISP - not the whole truth'

Thankfully, found this hidden away at [pdf d/l link] : http://www.ee.ryerson.ca/~elf/pub/misc/micromanualLISP.pdf

Re:Lisp in about 200 lines of Ruby by jacquesm on Monday November 09, 2009 @02:43AM (#930567)
thank you, I'd been looking for that one :)