diff options
| author | Maxime Dénès | 2018-11-06 09:30:45 +0100 |
|---|---|---|
| committer | Maxime Dénès | 2018-11-06 14:19:37 +0100 |
| commit | 58f891c100d1a1821ed6385c1d06f9e0a77ecdac (patch) | |
| tree | c0f4df2b872e71c51823ad2b62545b89897a6464 /pretyping/reductionops.ml | |
| parent | f6033667bd9b8069308d4bcba420c4ce0771e44f (diff) | |
Move debug term printer to kernel
Diffstat (limited to 'pretyping/reductionops.ml')
| -rw-r--r-- | pretyping/reductionops.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/reductionops.ml b/pretyping/reductionops.ml index aced97e910..17003cd1dd 100644 --- a/pretyping/reductionops.ml +++ b/pretyping/reductionops.ml @@ -353,7 +353,7 @@ struct | Proj (p,cst) -> str "ZProj(" ++ Constant.debug_print (Projection.constant p) ++ str ")" | Fix (f,args,cst) -> - str "ZFix(" ++ Termops.pr_fix pr_c f + str "ZFix(" ++ Constr.debug_print_fix pr_c f ++ pr_comma () ++ pr pr_c args ++ str ")" | Cst (mem,curr,remains,params,cst_l) -> str "ZCst(" ++ pr_cst_member pr_c mem ++ pr_comma () ++ int curr |