diff options
Diffstat (limited to 'common/PrintAST.ml')
| -rw-r--r-- | common/PrintAST.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/common/PrintAST.ml b/common/PrintAST.ml index 48172dfd..ac7d2276 100644 --- a/common/PrintAST.ml +++ b/common/PrintAST.ml @@ -70,6 +70,9 @@ let rec print_builtin_arg px oc = function | BA_splitlong(hi, lo) -> fprintf oc "splitlong(%a, %a)" (print_builtin_arg px) hi (print_builtin_arg px) lo + | BA_addptr(a1, a2) -> + fprintf oc "addptr(%a, %a)" + (print_builtin_arg px) a1 (print_builtin_arg px) a2 let rec print_builtin_args px oc = function | [] -> () |