rubinius-melbourne 3.7 → 3.8

data/ext/rubinius/code/melbourne/symbols.hpp

@@ -33,7 +33,9 @@ namespace MELBOURNE {
   extern ID rb_sData;
   extern ID rb_sDefined;
   extern ID rb_sDefn;
+  extern ID rb_sDefnm;
   extern ID rb_sDefs;
+  extern ID rb_sDefsm;
   extern ID rb_sDot2;
   extern ID rb_sDot3;
   extern ID rb_sDRegx;
@@ -52,6 +54,8 @@ namespace MELBOURNE {
   extern ID rb_sFlip3;
   extern ID rb_sFloat;
   extern ID rb_sFor;
+  extern ID rb_sFun;
+  extern ID rb_sFunm;
   extern ID rb_sGAsgn;
   extern ID rb_sGVar;
   extern ID rb_sHash;

data/ext/rubinius/code/melbourne/visitor.cpp

@@ -661,6 +661,24 @@ namespace MELBOURNE {
       tree = rb_funcall(ptp, rb_sDRegxOnce, 4, line, node->nd_lit, array, flags);
       break;
     }
+    case NODE_FUN: {
+      VALUE body = Qnil;
+
+      if (node->nd_defn) {
+        body = process_parse_tree(parser_state, ptp, node->nd_defn, locals);
+      }
+      tree = rb_funcall(ptp, rb_sFun, 3, line, ID2SYM(node->nd_mid), body);
+      break;
+    }
+    case NODE_FUNM: {
+      VALUE body = Qnil;
+
+      if (node->nd_defn) {
+        body = process_parse_tree(parser_state, ptp, node->nd_defn, locals);
+      }
+      tree = rb_funcall(ptp, rb_sFunm, 3, line, ID2SYM(node->nd_mid), body);
+      break;
+    }
     case NODE_DEFN: {
       VALUE body = Qnil;
 
@@ -670,6 +688,15 @@ namespace MELBOURNE {
       tree = rb_funcall(ptp, rb_sDefn, 3, line, ID2SYM(node->nd_mid), body);
       break;
     }
+    case NODE_DEFNM: {
+      VALUE body = Qnil;
+
+      if (node->nd_defn) {
+        body = process_parse_tree(parser_state, ptp, node->nd_defn, locals);
+      }
+      tree = rb_funcall(ptp, rb_sDefnm, 3, line, ID2SYM(node->nd_mid), body);
+      break;
+    }
     case NODE_DEFS: {
       VALUE recv = Qnil, body = Qnil;
 
@@ -680,6 +707,16 @@ namespace MELBOURNE {
       tree = rb_funcall(ptp, rb_sDefs, 4, line, recv, ID2SYM(node->nd_mid), body);
       break;
     }
+    case NODE_DEFSM: {
+      VALUE recv = Qnil, body = Qnil;
+
+      if (node->nd_defn) {
+        recv = process_parse_tree(parser_state, ptp, node->nd_recv, locals);
+        body = process_parse_tree(parser_state, ptp, node->nd_defn, locals);
+      }
+      tree = rb_funcall(ptp, rb_sDefsm, 4, line, recv, ID2SYM(node->nd_mid), body);
+      break;
+    }
     case NODE_CLASS: {
       VALUE name, super = Qnil;
 

data/lib/rubinius/code/melbourne/version.rb

@@ -1,5 +1,5 @@
 module CodeTools
   class Melbourne
-    VERSION = "3.7"
+    VERSION = "3.8"
   end
 end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: rubinius-melbourne
 version: !ruby/object:Gem::Version
-  version: '3.7'
+  version: '3.8'
 platform: ruby
 authors:
 - Brian Shirai
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2016-07-10 00:00:00.000000000 Z
+date: 2016-07-15 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: redcard
@@ -60,6 +60,7 @@ extensions:
 - ext/rubinius/code/melbourne/extconf.rb
 extra_rdoc_files: []
 files:
+- ext/rubinius/code/melbourne/defs/keywords
 - ext/rubinius/code/melbourne/encoding_compat.cpp
 - ext/rubinius/code/melbourne/encoding_compat.hpp
 - ext/rubinius/code/melbourne/extconf.rb