added readTriple in libsg and its Haskell binding

2015-11-25 10:37:13 +00:00
parent 55cfea35eb
commit 79ea4af960
4 changed files with 39 additions and 3 deletions
--- a/src/runtime/c/pgf/expr.h
+++ b/src/runtime/c/pgf/expr.h
@@ -160,7 +160,7 @@ pgf_read_expr(GuIn* in, GuPool* pool, GuExn* err);

 int
 pgf_read_expr_tuple(GuIn* in,
-                    int n_exprs, PgfExpr exprs[],
+                    size_t n_exprs, PgfExpr exprs[],
                    GuPool* pool, GuExn* err);

 PgfType*
@@ -206,4 +206,8 @@ void
 pgf_print_type(PgfType *type, PgfPrintContext* ctxt, int prec,
               GuOut* out, GuExn *err);

+void
+pgf_print_expr_tuple(size_t n_exprs, PgfExpr exprs[], PgfPrintContext* ctxt,
+                     GuOut* out, GuExn* err);
+
 #endif /* EXPR_H_ */