obriencj

"""

My take on the Church of Lambda. I've tweaked and added a few thing to
make life more enjoyable

author: Christopher O'Brien  <siege@preoccupied.net>

inspiration from http://doos.m3r.nl/~ivo/lambda.txt

"""

obriencj

maybe:python-spexy siege$ PYTHONPATH=./ python tmp/spexy_try.py
The original spexy source is
-----
(defun division (x y)
  (let ((result None))
    (try
      (setf result (/ x y))

      ((ZeroDivisionError)
        (println "division by zero!" x "/" y)

obriencj

maybe:python-spexy siege$ PYTHONPATH=./ python 
Python 2.7.6 (default, Nov 18 2013, 15:12:51) 
[GCC 4.2.1 Compatible Apple LLVM 5.0 (clang-500.2.79)] on darwin
Type "help", "copyright", "credits" or "license" for more information.
>>> from spexy import repl
>>> from datetime import datetime
>>> repl(globals())
>>>> (let ((who "siege") (date 1999))
       (letrec ((fmt "Hello %s, party like it is %i!")
                (msg (% fmt (make-tuple who date))))

obriencj

[siege@maybe src]$ python spexy.py
>>>> (defun make_pair ()
        (letrec ((value None)
                (getter (lambda () value))
                (setter (lambda (v) (setf value v))))
            (make-list getter setter)))
--> globals().__setitem__('make_pair', (lambda : ((lambda value, getter, setter: ((value.__setitem__(0, None), getter.__setitem__(0, (lambda : value[0])), setter.__setitem__(0, (lambda v: value.__setitem__(0, v))),)[-1], [getter[0], setter[0],],)[-1])([None], [None], [None]))))
>>>> (letrec ((gs (make_pair)))
        (define getter (getf gs 0))
        (define setter (getf gs 1)))

obriencj

#!/usr/bin/env python2


"""

Given two tags, do absolutely nothing.

This script is just a stub illustrating the bits I re-use for every
CLI utility I write.