An only slightly altered version for Common Lisp. The LABEL syntax is slightly different to make it valid CL.

https://gist.github.com/lispm/d752d5761f7078de4041d4e453e70c...

Tasks to explore:

Check that it is actually equally to the published code.

Check that it can interpret itself.

Understand the language it implements and the consequences of no error checking...

  MCLISP 139 > (mclisp:mccarthy-repl)
  mce> (label example (lambda (foo bar) (cons (cons foo 'nil) (cons 'bar 'baz)))
              'qix 'qux)
  ((QIX) BAR . BAZ) 
  mce>