Path: utzoo!attcan!uunet!cs.utexas.edu!usc!ucsd!rutgers!rochester!pt.cs.cmu.edu!wb1.cs.cmu.edu!ram
From: ram@wb1.cs.cmu.edu (Rob MacLachlan)
Newsgroups: comp.lang.lisp
Subject: Re: Virtues of Lisp syntax (a tangent on macros and Scheme)
Message-ID: <10606@pt.cs.cmu.edu>
Date: 29 Sep 90 17:20:28 GMT
References: <10466@life.ai.mit.edu> <6217@castle.ed.ac.uk> <10722@life.ai.mit.edu> <20501@well.sf.ca.us> <1990Sep18.180829.8801@hellgate.utah.edu> <12812@ists.ists.ca> <LOU.90Sep26151849@atanasoff.rutgers.edu>
Organization: Carnegie-Mellon University, CS/RI
Lines: 22

You just weren't using the right compiler.  foo.lisp is:
    (defun test ()
        (prog ((:end 42))
            (print :end)))

________________________________
* (compile-file "test:foo.lisp")

Python version 0.0, VM version DECstation 3100/Mach 0.0 on 29 SEP 90 01:13:48 pm.
Compiling: /afs/cs.cmu.edu/project/clisp/new-compiler/tests/foo.lisp 29 SEP 90 01:13:19 pm


In: DEFUN TEST
  (PROG ((:END 42))
        (PRINT :END))
--> BLOCK 
==>
  (LET ((:END 42)) (TAGBODY (PRINT :END)))
Error: Name of lambda-variable is a constant: :END.
________________________________

  Rob (ram@cs.cmu.edu)