comparison graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/nodes/local/WriteLocalNode.java @ 13761:7c418666c6c9

Refactoring and cleanup of Simple Language (more to come soon)
author Christian Wimmer <christian.wimmer@oracle.com>
date Fri, 24 Jan 2014 18:16:24 -0800
parents graal/com.oracle.truffle.sl/src/com/oracle/truffle/sl/nodes/WriteLocalNode.java@136df94b5aa8
children
comparison
equal deleted inserted replaced
13760:a12017c18d5d 13761:7c418666c6c9
1 /*
2 * Copyright (c) 2012, 2012, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
15 * You should have received a copy of the GNU General Public License version
16 * 2 along with this work; if not, write to the Free Software Foundation,
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 */
23 package com.oracle.truffle.sl.nodes.local;
24
25 import com.oracle.truffle.api.*;
26 import com.oracle.truffle.api.dsl.*;
27 import com.oracle.truffle.api.frame.*;
28 import com.oracle.truffle.sl.nodes.*;
29
30 @NodeChild(value = "rightNode", type = SLExpressionNode.class)
31 public abstract class WriteLocalNode extends SLExpressionNode {
32
33 private final FrameSlot slot;
34
35 public WriteLocalNode(FrameSlot slot) {
36 this.slot = slot;
37 }
38
39 public WriteLocalNode(WriteLocalNode node) {
40 this(node.slot);
41 }
42
43 @Specialization(guards = "isLongKind")
44 protected final long write(VirtualFrame frame, long right) {
45 frame.setLong(slot, right);
46 return right;
47 }
48
49 @Specialization(guards = "isBooleanKind")
50 protected final boolean write(VirtualFrame frame, boolean right) {
51 frame.setBoolean(slot, right);
52 return right;
53 }
54
55 @Specialization(guards = "isObjectKind")
56 protected final Object writeGeneric(VirtualFrame frame, Object right) {
57 frame.setObject(slot, right);
58 return right;
59 }
60
61 protected final boolean isLongKind() {
62 return isKind(FrameSlotKind.Long);
63 }
64
65 protected final boolean isBooleanKind() {
66 return isKind(FrameSlotKind.Boolean);
67 }
68
69 protected final boolean isObjectKind() {
70 if (slot.getKind() != FrameSlotKind.Object) {
71 CompilerDirectives.transferToInterpreter();
72 slot.setKind(FrameSlotKind.Object);
73 }
74 return true;
75 }
76
77 private boolean isKind(FrameSlotKind kind) {
78 return slot.getKind() == kind || initialSetKind(kind);
79 }
80
81 private boolean initialSetKind(FrameSlotKind kind) {
82 if (slot.getKind() == FrameSlotKind.Illegal) {
83 CompilerDirectives.transferToInterpreter();
84 slot.setKind(kind);
85 return true;
86 }
87 return false;
88 }
89 }