diff options
Diffstat (limited to '')
| -rw-r--r-- | compiler/PrintPure.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/PrintPure.ml b/compiler/PrintPure.ml index 33082dc3..de68adc3 100644 --- a/compiler/PrintPure.ml +++ b/compiler/PrintPure.ml @@ -426,7 +426,7 @@ let fun_suffix (lp_id : LoopId.id option) (rg_id : T.RegionGroupId.id option) : let lp_suff = match lp_id with | None -> "" - | Some lp_id -> "^loop^" ^ LoopId.to_string lp_id + | Some lp_id -> "^loop" ^ LoopId.to_string lp_id in let rg_suff = |