diff options
| author | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-11-21 16:46:00 +0100 |
|---|---|---|
| committer | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-11-21 16:46:00 +0100 |
| commit | 415f94f0978fbf3104f93033fe21ec88f2ec454f (patch) | |
| tree | cebc28a1abf748d3a5493d92f7bebc28d7fc389a | |
| parent | 18c57ed99f55c999080000ebe12ffbae68357eee (diff) | |
| download | LPC-Projet-415f94f0978fbf3104f93033fe21ec88f2ec454f.tar.gz LPC-Projet-415f94f0978fbf3104f93033fe21ec88f2ec454f.zip | |
Corrected a pretty-printing bug.
| -rw-r--r-- | src/pretty.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/pretty.ml b/src/pretty.ml index c3d12f3..1307bdf 100644 --- a/src/pretty.ml +++ b/src/pretty.ml @@ -79,7 +79,7 @@ let binop_str = function | Modulo -> "%" | Land -> "&&" | Lor -> "||" let unop_str = function | PreIncr -> "++." | PostIncr -> ".++" | PreDecr -> "--." | PostDecr -> ".--" - | Ref -> "&" | Deref -> "&" | Not -> "!" | Minus -> "-" | Plus -> "+" + | Ref -> "&" | Deref -> "*" | Not -> "!" | Minus -> "-" | Plus -> "+" let rec var_type_str = function | TVoid -> "void" | TInt -> "int" | TIdent(i) -> i | TPtr(k) -> "*" ^ (var_type_str k) |