/*
- * Copyright (C) 2012, 2013
+ * Copyright (C) 2012, 2013, 2014
* Wolfgang Bumiller
* Dale Weiler
*
#include "lexer.h"
#include "ast.h"
+typedef struct intrin_s intrin_t;
+typedef struct parser_s parser_t;
+
typedef struct {
struct parser_s *parser;
ast_value **imm_float; /* vector<ast_value*> */
hash_table_t *imm_string_dotranslate; /* map<string, ast_value*> */
} fold_t;
+typedef struct {
+ ast_expression *(*intrin)(intrin_t *);
+ const char *name;
+ const char *alias;
+ size_t args;
+} intrin_func_t;
+
+struct intrin_s {
+ intrin_func_t *intrinsics; /* vector<intrin_func_t> */
+ ast_expression **generated; /* vector<ast_expression*> */
+ parser_t *parser;
+ fold_t *fold;
+};
+
#define parser_ctx(p) ((p)->lex->tok.ctx)
-typedef struct parser_s {
+struct parser_s {
lex_file *lex;
int tok;
/* collected information */
size_t max_param_count;
- fold_t *fold;
-} parser_t;
+ fold_t *fold;
+ intrin_t *intrin;
+};
-char *parser_strdup(const char *str);
+/* parser.c */
+char *parser_strdup (const char *str);
+ast_expression *parser_find_global(parser_t *parser, const char *name);
/* fold.c */
fold_t *fold_init (parser_t *);
void fold_cleanup (fold_t *);
-ast_expression *fold_constgen_float (fold_t *, qcfloat_t);
+ast_expression *fold_constgen_float (fold_t *, qcfloat_t, bool);
ast_expression *fold_constgen_vector(fold_t *, vec3_t);
ast_expression *fold_constgen_string(fold_t *, const char *, bool);
bool fold_generate (fold_t *, ir_builder *);
-ast_expression *fold_op (fold_t *, const oper_info *, ast_expression**);
+ast_expression *fold_op (fold_t *, const oper_info *, ast_expression **);
+ast_expression *fold_intrin (fold_t *, const char *, ast_expression **);
+
+ast_expression *fold_binary (lex_ctx_t ctx, int, ast_expression *, ast_expression *);
+int fold_cond_ifthen (ir_value *, ast_function *, ast_ifthen *);
+int fold_cond_ternary (ir_value *, ast_function *, ast_ternary *);
+
+/* intrin.c */
+intrin_t *intrin_init (parser_t *parser);
+void intrin_cleanup (intrin_t *intrin);
+ast_expression *intrin_fold (intrin_t *intrin, ast_value *, ast_expression **);
+ast_expression *intrin_func (intrin_t *intrin, const char *name);
+ast_expression *intrin_debug_typestring(intrin_t *intrin);
+
#endif