Current column a print stream

[Donna and Dan Stanger]

Is there a function that returns the current column a print stream?
That is, how many characters have been written since the last newline
or CR?  I need this to port gentran, a maxima package to common lisp
from VAX Lisp.
Thanks,
Dan Stanger