Possible bug in Clim-2 for Allegro

• To: clim@BBN.COM
• Subject: Possible bug in Clim-2 for Allegro
• From: Adam Carlson <carlson@titanic.cs.umass.edu>
• Date: Fri, 21 Jan 1994 11:26:56 -0500

In Allegro CL 4.2.beta2.0 with Clim 2

(setf (stream-cursor-position stream) (values x y))

Macroexpands to:

(LET* ((#:STREAM-TEMP-1 STREAM) (#:X-TEMP-2 (VALUES X Y)))
  (FUNCALL #'CLIM:UTILS::|SETF* CLIM:STREAM-CURSOR-POSITION|
           #:X-TEMP-2 #:Y-TEMP-3 #:STREAM-TEMP-1))

Where it should expand to something like:

(LET* ((#:STREAM-TEMP-1 STREAM))
  (MULITPLE-VALUE-BIND (#:X-TEMP-2 #:Y-TEMP-3) (VALUES X Y)
    (FUNCALL #'CLIM:UTILS::|SETF* CLIM:STREAM-CURSOR-POSITION|
             #:X-TEMP-2 #:Y-TEMP-3 #:STREAM-TEMP-1)))

Spot checking indicates that this is the behavior of all the
multiple-valued defgeneric*, defmethod* and setf* code.

Adam

• Re: Possible bug in Clim-2 for Allegro
• From: Colin Meldrum <colin@franz.com>

• Prev: clim2, command-enabled, and the menu-bar
• Next: (ACCEPT '(AND EXPRESSION (SATISFIES <func>))) doesn't work right
• Index: CLIM Mailing list (1-Jun-94 to 30-Jun-95)
• Thread: CLIM Mailing list Index (1-Jun-94 to 30-Jun-95)