write*

[procedure] write* obj [port]

STk, STklos, Gauche: writes obj to port. If there's a circular or shared substructure in obj, using #1= and #1# notation to write it out.