From 86e9acc7a7b714307e08ab25117ca03cecb00936 Mon Sep 17 00:00:00 2001 From: "kr.angelov" Date: Thu, 9 Oct 2014 13:44:26 +0000 Subject: throw away the long obsolete runtime type information in the C runtime --- src/runtime/c/pgf/expr.c | 51 ------------------------------------------------ 1 file changed, 51 deletions(-) (limited to 'src/runtime/c/pgf/expr.c') diff --git a/src/runtime/c/pgf/expr.c b/src/runtime/c/pgf/expr.c index 6ea2c820f..f3cbf1f20 100644 --- a/src/runtime/c/pgf/expr.c +++ b/src/runtime/c/pgf/expr.c @@ -73,57 +73,6 @@ pgf_expr_unapply(PgfExpr expr, GuPool* pool) return appl; } -GU_DEFINE_TYPE(PgfBindType, enum, - GU_ENUM_C(PgfBindType, PGF_BIND_TYPE_EXPLICIT), - GU_ENUM_C(PgfBindType, PGF_BIND_TYPE_IMPLICIT)); - -GU_DEFINE_TYPE(PgfLiteral, GuVariant, - GU_CONSTRUCTOR_S(PGF_LITERAL_STR, PgfLiteralStr, - GU_MEMBER(PgfLiteralStr, val, GuString)), - GU_CONSTRUCTOR_S(PGF_LITERAL_INT, PgfLiteralInt, - GU_MEMBER(PgfLiteralInt, val, int)), - GU_CONSTRUCTOR_S(PGF_LITERAL_FLT, PgfLiteralFlt, - GU_MEMBER(PgfLiteralFlt, val, double))); - -GU_DECLARE_TYPE(PgfType, struct); - -GU_DEFINE_TYPE(PgfHypo, struct, - GU_MEMBER(PgfHypo, bind_type, PgfBindType), - GU_MEMBER(PgfHypo, cid, PgfCId), - GU_MEMBER_P(PgfHypo, type, PgfType)); - -GU_DEFINE_TYPE( - PgfExpr, GuVariant, - GU_CONSTRUCTOR_S( - PGF_EXPR_ABS, PgfExprAbs, - GU_MEMBER(PgfExprAbs, bind_type, PgfBindType), - GU_MEMBER(PgfExprAbs, id, GuString), - GU_MEMBER(PgfExprAbs, body, PgfExpr)), - GU_CONSTRUCTOR_S( - PGF_EXPR_APP, PgfExprApp, - GU_MEMBER(PgfExprApp, fun, PgfExpr), - GU_MEMBER(PgfExprApp, arg, PgfExpr)), - GU_CONSTRUCTOR_S( - PGF_EXPR_LIT, PgfExprLit, - GU_MEMBER(PgfExprLit, lit, PgfLiteral)), - GU_CONSTRUCTOR_S( - PGF_EXPR_META, PgfExprMeta, - GU_MEMBER(PgfExprMeta, id, int)), - GU_CONSTRUCTOR_S( - PGF_EXPR_FUN, PgfExprFun, - GU_MEMBER(PgfExprFun, fun, GuString)), - GU_CONSTRUCTOR_S( - PGF_EXPR_VAR, PgfExprVar, - GU_MEMBER(PgfExprVar, var, int)), - GU_CONSTRUCTOR_S( - PGF_EXPR_TYPED, PgfExprTyped, - GU_MEMBER(PgfExprTyped, expr, PgfExpr), - GU_MEMBER_P(PgfExprTyped, type, PgfType)), - GU_CONSTRUCTOR_S( - PGF_EXPR_IMPL_ARG, PgfExprImplArg, - GU_MEMBER(PgfExprImplArg, expr, PgfExpr))); - - typedef struct PgfExprParser PgfExprParser; typedef enum { -- cgit v1.2.3