summaryrefslogtreecommitdiffhomepage
path: root/src/codegen.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/codegen.c')
-rw-r--r--src/codegen.c20
1 files changed, 20 insertions, 0 deletions
diff --git a/src/codegen.c b/src/codegen.c
index 1f6d16477..86cb5eb87 100644
--- a/src/codegen.c
+++ b/src/codegen.c
@@ -16,6 +16,7 @@
#include <string.h>
#include <stdlib.h>
#include <ctype.h>
+#include "re.h"
typedef mrb_ast_node node;
typedef struct mrb_parser_state parser_state;
@@ -1910,6 +1911,25 @@ codegen(codegen_scope *s, node *tree, int val)
}
break;
+ case NODE_REGX:
+ if (val) {
+ char *p1 = (char*)tree->car;
+ //char *p2 = (char*)tree->cdr;
+ int ai = mrb_gc_arena_save(s->mrb);
+ struct RClass* c = mrb_class_get(s->mrb, REGEXP_CLASS);
+ mrb_value args[2];
+ args[0] = mrb_str_new(s->mrb, p1, strlen(p1));
+ // TODO: Some regexp implementation does not have second argument
+ //args[1] = mrb_str_new(s->mrb, p2, strlen(p2));
+ int off = new_lit(s,
+ mrb_class_new_instance(s->mrb, 1, args, c));
+
+ mrb_gc_arena_restore(s->mrb, ai);
+ genop(s, MKOP_ABx(OP_LOADL, cursp(), off));
+ push();
+ }
+ break;
+
case NODE_SYM:
if (val) {
int sym = new_sym(s, sym(tree));