aboutsummaryrefslogtreecommitdiffstats
path: root/backend/PrintXTL.ml
diff options
context:
space:
mode:
Diffstat (limited to 'backend/PrintXTL.ml')
-rw-r--r--backend/PrintXTL.ml3
1 files changed, 3 insertions, 0 deletions
diff --git a/backend/PrintXTL.ml b/backend/PrintXTL.ml
index 08ccf129..b9813db0 100644
--- a/backend/PrintXTL.ml
+++ b/backend/PrintXTL.ml
@@ -102,6 +102,9 @@ let print_instruction pp succ = function
| Xbuiltin(ef, args, res) ->
fprintf pp "%a = %s(%a)"
vars res (name_of_external ef) vars args
+ | Xannot(ef, args) ->
+ fprintf pp "%s(%a)"
+ (name_of_external ef) (print_annot_args var) args
| Xbranch s ->
print_succ pp s succ
| Xcond(cond, args, s1, s2) ->