summaryrefslogtreecommitdiff
path: root/src/pretty.ml
diff options
context:
space:
mode:
authorAlex AUVOLAT <alex.auvolat@ens.fr>2013-11-21 16:46:00 +0100
committerAlex AUVOLAT <alex.auvolat@ens.fr>2013-11-21 16:46:00 +0100
commit415f94f0978fbf3104f93033fe21ec88f2ec454f (patch)
treecebc28a1abf748d3a5493d92f7bebc28d7fc389a /src/pretty.ml
parent18c57ed99f55c999080000ebe12ffbae68357eee (diff)
downloadLPC-Projet-415f94f0978fbf3104f93033fe21ec88f2ec454f.tar.gz
LPC-Projet-415f94f0978fbf3104f93033fe21ec88f2ec454f.zip
Corrected a pretty-printing bug.
Diffstat (limited to 'src/pretty.ml')
-rw-r--r--src/pretty.ml2
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)