[Truffle] implement Module#singleton_class?

jruby · Aug 28, 2015 · 0325c2f · 0325c2f
1 parent 7b43d87
commit 0325c2f
Showing 2 changed files with 17 additions and 5 deletions.
diff --git a/spec/truffle/tags/core/kernel/singleton_class_tags.txt b/spec/truffle/tags/core/kernel/singleton_class_tags.txt
diff --git a/truffle/src/main/java/org/jruby/truffle/nodes/core/ModuleNodes.java b/truffle/src/main/java/org/jruby/truffle/nodes/core/ModuleNodes.java
@@ -2008,4 +2008,21 @@ public DynamicObject allocate(DynamicObject rubyClass) {
 
     }
 
+    @CoreMethod(names = "singleton_class?")
+    public abstract static class IsSingletonClassNode extends CoreMethodArrayArgumentsNode {
+
+        public IsSingletonClassNode(RubyContext context, SourceSection sourceSection) {
+            super(context, sourceSection);
+        }
+
+        @Specialization(guards = "!isRubyClass(rubyModule)")
+        public Object doModule(DynamicObject rubyModule) {
+            return false;
+        }
+
+        @Specialization(guards = "isRubyClass(rubyClass)")
+        public Object doClass(DynamicObject rubyClass) {
+            return Layouts.CLASS.getIsSingleton(rubyClass);
+        }
+    }
 }