fix
This commit is contained in:
2
sexpr.ml
2
sexpr.ml
@@ -792,7 +792,7 @@ let () =
|
|||||||
{ source = src; path = "top" }
|
{ source = src; path = "top" }
|
||||||
parsr in
|
parsr in
|
||||||
let v = Option.get v in
|
let v = Option.get v in
|
||||||
let v = SExpr.flat_map SExprMacroExp.do_eval v in
|
let v = SExprMacroExp.do_eval v in
|
||||||
|
|
||||||
Format.set_margin 40;
|
Format.set_margin 40;
|
||||||
Format.printf "%a@.@?" SExpr.pp_t v;
|
Format.printf "%a@.@?" SExpr.pp_t v;
|
||||||
|
Reference in New Issue
Block a user