Mercurial > hg > graal-jvmci-8
view graal/com.oracle.truffle.ruby.nodes/src/com/oracle/truffle/ruby/nodes/core/TrueClassNodes.java @ 13736:64fa70319890
Merge with 9161ed8ce7964ca3df5e91894522b207a2bc4a3e
author | Michael Van De Vanter <michael.van.de.vanter@oracle.com> |
---|---|
date | Wed, 22 Jan 2014 21:34:00 -0800 |
parents | 0fbee3eb71f0 |
children |
line wrap: on
line source
/* * 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.ruby.runtime.*; import com.oracle.truffle.ruby.runtime.core.*; @CoreClass(name = "TrueClass") public abstract class TrueClassNodes { @CoreMethod(names = "!", needsSelf = false, maxArgs = 0) public abstract static class NotNode extends CoreMethodNode { public NotNode(RubyContext context, SourceSection sourceSection) { super(context, sourceSection); } public NotNode(NotNode prev) { super(prev); } @Specialization public boolean not() { return false; } } @CoreMethod(names = {"==", "===", "=~"}, needsSelf = false, minArgs = 1, maxArgs = 1) public abstract static class EqualNode extends CoreMethodNode { public EqualNode(RubyContext context, SourceSection sourceSection) { super(context, sourceSection); } public EqualNode(EqualNode prev) { super(prev); } @Specialization public boolean equal(boolean other) { return other; } @Specialization public boolean equal(Object other) { return other instanceof Boolean && ((boolean) other); } } @CoreMethod(names = "^", needsSelf = false, minArgs = 1, maxArgs = 1) public abstract static class XorNode extends CoreMethodNode { public XorNode(RubyContext context, SourceSection sourceSection) { super(context, sourceSection); } public XorNode(XorNode prev) { super(prev); } @Specialization public boolean xor(boolean other) { return true ^ other; } } @CoreMethod(names = "to_s", needsSelf = false, 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() { return getContext().makeString("true"); } } }