print_string (String.make !indent ' ' ^ s ^ ss) in
fun enter ?right_justify s ->
if enter then (print_string ~right_justify s; incr indent) else (decr indent; print_string ~right_justify s)
print_string (String.make !indent ' ' ^ s ^ ss) in
fun enter ?right_justify s ->
if enter then (print_string ~right_justify s; incr indent) else (decr indent; print_string ~right_justify s)