get-write-length

[procedure] set-write-length! len

[procedure] get-write-length

Bigloo: sets/gets a global write length parameter, which specifies maximum number of atoms written by write and display. Can be used to avoid infinit loop while printing circular structure.

Common Lisp has similar feature using variable *print-length*.