diff options
Diffstat (limited to 'cfrontend/PrintClight.ml')
| -rw-r--r-- | cfrontend/PrintClight.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/cfrontend/PrintClight.ml b/cfrontend/PrintClight.ml index 0e8b494..b05876a 100644 --- a/cfrontend/PrintClight.ml +++ b/cfrontend/PrintClight.ml @@ -40,8 +40,7 @@ let register_struct_union id fld = (* Naming temporaries *) -let temp_name (id: ident) = - Printf.sprintf "$%ld" (camlint_of_positive id) +let temp_name (id: ident) = Z.to_string (Z.Zpos id) (* Declarator (identifier + type) -- reuse from PrintCsyntax *) |