From 9d72db4e9a39ba260a4bf11e0c0a9890e97f5ee5 Mon Sep 17 00:00:00 2001 From: Salvador Abreu Date: Thu, 18 Jun 2015 10:39:47 +0900 Subject: [PATCH] rename predicate --- fzn-parser/fznslurp.pl | 7 +++++++ 1 file changed, 7 insertions(+), 0 deletions(-) create mode 100644 fzn-parser/fznslurp.pl diff --git a/fzn-parser/fznslurp.pl b/fzn-parser/fznslurp.pl new file mode 100644 index 0000000..ba2f8c3 --- /dev/null +++ b/fzn-parser/fznslurp.pl @@ -0,0 +1,7 @@ +% == No, Emacs this is -*-Prolog-*- code, not what you thought... ============= + +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). + -- libgit2 0.21.2