From e8354187a882fb26939ceb1f3819867a7348c190 Mon Sep 17 00:00:00 2001 From: Salvador Abreu Date: Thu, 18 Jun 2015 15:27:01 +0900 Subject: [PATCH] debugging code --- fzn-parser/fznslurp.pl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/fzn-parser/fznslurp.pl b/fzn-parser/fznslurp.pl index ba2f8c3..24a7e5d 100644 --- a/fzn-parser/fznslurp.pl +++ b/fzn-parser/fznslurp.pl @@ -3,5 +3,7 @@ load_ast(AST) :- load_ast(_>[], [], AST). load_ast(end_of_file, AST, AST). -load_ast(IN > INT, IN, OUT) :- read(OP), load_ast(OP, INT, OUT). +load_ast(IN > INT, IN, OUT) :- read(OP), !, + write(OP), nl, + load_ast(OP, INT, OUT). -- libgit2 0.21.2