[Ecls-list] BUG in CTYPECASE

[Eric Marsden]

Hi,

The following is ECL compiled from current git, on Linux/AMD64.

,----
| > (lisp-implementation-version)
| "9.8.4"
| > (ctypecase :foo (integer 1) (keyword 2))
| In form
| (SETQ :FOO #:G130)
| SETQ: Tried to assign a value to the constant :FOO.
| Available restarts:
| 1. (QUIT-DEBUGGER) Quit debugger level 1.
| 2. (RESTART-TOPLEVEL) Go back to Top-Level REPL.
`----

(From the ansi-test suite)

-- 
Eric Marsden