| let instr oc width e = Sexpr.output oc width (Arrange.instr e) | |
| let func oc width f = Sexpr.output oc width (Arrange.func f) | |
| let module_ oc width m = Sexpr.output oc width (Arrange.module_ m) | |
| let script oc width mode s = | |
| List.iter (Sexpr.output oc width) (Arrange.script mode s) |