From 2eee382a62a909d5a3f2f5eda94f30fe68fd5335 Mon Sep 17 00:00:00 2001 From: "kr.angelov" Date: Fri, 20 Jan 2012 13:41:10 +0000 Subject: initial import of the C runtime --- src/runtime/c/pgf/edsl.h | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 src/runtime/c/pgf/edsl.h (limited to 'src/runtime/c/pgf/edsl.h') diff --git a/src/runtime/c/pgf/edsl.h b/src/runtime/c/pgf/edsl.h new file mode 100644 index 000000000..af21e6c15 --- /dev/null +++ b/src/runtime/c/pgf/edsl.h @@ -0,0 +1,20 @@ +#ifndef PGF_EDSL_H_ +#define PGF_EDSL_H_ + +#include + +#define APP(f, a) \ + gu_new_variant_i(PGF_EDSL_POOL, PGF_EXPR_APP, PgfExprApp, f, a) +#define APP2(f, a1, a2) APP(APP(f, a1), a2) +#define APP3(f, a1, a2, a3) APP2(APP(f, a1), a2, a3) + +#define VAR(s) \ + gu_new_variant_i(PGF_EDSL_POOL, PGF_EXPR_FUN, PgfExprFun, gu_cstring(#s)) + +#define APPV(s, a) APP(VAR(s), a) +#define APPV2(s, a1, a2) APP2(VAR(s), a1, a2) +#define APPV3(s, a1, a2, a3) APP3(VAR(s), a1, a2) + + + +#endif // PGF_EDSL_H_ -- cgit v1.2.3