Problem with format-graph-from-root within present

• To: beschta@informatik.tu-muenchen.de, clim@BBN.COM
• Subject: Problem with format-graph-from-root within present
• From: Scott McKay <SWM@stony-brook.scrc.symbolics.com>
• Date: Fri, 15 May 1992 10:49-0400
• In-Reply-To: <19920515101110.1.TONI@l.zfe.siemens.de>

    Date: Fri, 15 May 1992 06:11 EDT
    From: Anton Beschta <toni@l4.zfe.siemens.de>

    Dear CLIMers,

    I'm having a problem using format-graph-from-root within a 
    presentation method. Consider the following example:

    (clim:define-presentation-type mr ())

    (clim:define-presentation-method clim:present
				     (mr (type mr) stream view &key)
      (clim:format-graph-from-root
	mr
	#'(lambda (object stream) (print (car object) stream))
	#'second
	:stream stream)))

    (clim:present '(a ((b) (c) (d))) 'mr)

    Evaluating the above in a Lisp Listener (Genera 8.1, CLIM 27.0,
    no ECOs) results in the node names being placed properly
    but the connecting lines always being drawn at the *top* of
    the listener's history.

    Evaluating

    (clim:format-graph-from-root
      '(a ((b) (c) (d)))
      #'(lambda (object stream) (print (car object) stream))
      #'second
      :stream stream)

    results in the expected output.

    Any hints/workarounds appreciated,
 
This works correctly in CLIM 1.1.  You should call Symbolics software
support to find out how to get CLIM 1.1

• Problem with format-graph-from-root within present
• From: Anton Beschta <toni@l4.zfe.siemens.de>

• Prev: Problem with format-graph-from-root within present
• Next: Vacation
• Index: CLIM Mailing list (1-Jan-92 to 31-Aug-92)
• Thread: CLIM Mailing list Index (1-Jan-92 to 31-Aug-92)