Mercurial > hg > graal-compiler
diff graal/com.oracle.truffle.ruby.nodes/src/com/oracle/truffle/ruby/nodes/core/ClassNodes.java @ 13529:856c2c294f84
Merge.
author | Christian Humer <christian.humer@gmail.com> |
---|---|
date | Tue, 07 Jan 2014 18:53:04 +0100 |
parents | 0fbee3eb71f0 |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/graal/com.oracle.truffle.ruby.nodes/src/com/oracle/truffle/ruby/nodes/core/ClassNodes.java Tue Jan 07 18:53:04 2014 +0100 @@ -0,0 +1,90 @@ +/* + * Copyright (c) 2013 Oracle and/or its affiliates. All rights reserved. This + * code is released under a tri EPL/GPL/LGPL license. You can use it, + * redistribute it and/or modify it under the terms of the: + * + * Eclipse Public License version 1.0 + * GNU General Public License version 2 + * GNU Lesser General Public License version 2.1 + */ +package com.oracle.truffle.ruby.nodes.core; + +import com.oracle.truffle.api.*; +import com.oracle.truffle.api.dsl.*; +import com.oracle.truffle.api.frame.*; +import com.oracle.truffle.ruby.nodes.call.*; +import com.oracle.truffle.ruby.runtime.*; +import com.oracle.truffle.ruby.runtime.core.*; +import com.oracle.truffle.ruby.runtime.objects.*; + +@CoreClass(name = "Class") +public abstract class ClassNodes { + + @CoreMethod(names = "===", minArgs = 1, maxArgs = 1) + public abstract static class ContainsInstanceNode extends CoreMethodNode { + + public ContainsInstanceNode(RubyContext context, SourceSection sourceSection) { + super(context, sourceSection); + } + + public ContainsInstanceNode(ContainsInstanceNode prev) { + super(prev); + } + + @Specialization + public boolean containsInstance(RubyClass rubyClass, RubyBasicObject instance) { + return instance.getRubyClass().assignableTo(rubyClass); + } + } + + @CoreMethod(names = "new", needsBlock = true, isSplatted = true) + public abstract static class NewNode extends CoreMethodNode { + + @Child protected DispatchHeadNode initialize; + + public NewNode(RubyContext context, SourceSection sourceSection) { + super(context, sourceSection); + initialize = adoptChild(new DispatchHeadNode(context, getSourceSection(), "initialize", false)); + } + + public NewNode(NewNode prev) { + super(prev); + initialize = adoptChild(prev.initialize); + } + + @Specialization + public RubyBasicObject newInstance(VirtualFrame frame, RubyClass rubyClass, Object[] args, @SuppressWarnings("unused") UndefinedPlaceholder block) { + return doNewInstance(frame, rubyClass, args, null); + } + + @Specialization + public RubyBasicObject newInstance(VirtualFrame frame, RubyClass rubyClass, Object[] args, RubyProc block) { + return doNewInstance(frame, rubyClass, args, block); + } + + private RubyBasicObject doNewInstance(VirtualFrame frame, RubyClass rubyClass, Object[] args, RubyProc block) { + final RubyBasicObject instance = rubyClass.newInstance(); + initialize.dispatch(frame, instance, block, args); + return instance; + } + + } + + @CoreMethod(names = "to_s", maxArgs = 0) + public abstract static class ToSNode extends CoreMethodNode { + + public ToSNode(RubyContext context, SourceSection sourceSection) { + super(context, sourceSection); + } + + public ToSNode(ToSNode prev) { + super(prev); + } + + @Specialization + public RubyString toS(RubyClass rubyClass) { + return getContext().makeString(rubyClass.getName()); + } + } + +}