>>>>> "Dan" == Donna and Dan Stanger <[EMAIL PROTECTED]> writes:
Dan> Is there a function that returns the current column a print stream?
Dan> That is, how many characters have been written since the last newline
Dan> or CR? I need this to port gentran, a maxima package to common lisp
Perhaps lisp::charpos will do what you want?
(with-output-to-string (s)
(format s "Hello")
(format t "pos = ~A~%" (lisp::charpos s))
(format s " World")
(format t "pos = ~A~%" (lisp::charpos s))
(format s "~%")
(format t "pos = ~A~%" (lisp::charpos s)))
=>
pos = 5
pos = 11
pos = 0
"Hello World
"
But I would agree with Rahul. If possible try to use the standard
Lisp pretty-printer.
Ray
