Mercurial > hg > graal-compiler

annotate graal/com.oracle.truffle.interop/src/com/oracle/truffle/interop/messages/UnaryMessage.java @ 21526:1da7aef31a08

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
created com.oracle.graal.hotspot.jvmci package and moved classes destined for future JVMCI module into it (JBS:GRAAL-53)
author Doug Simon <doug.simon@oracle.com>
date Tue, 19 May 2015 23:16:07 +0200
parents 556b6a4b36b2
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
21013
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
1 /*
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
2 * Copyright (c) 2014, Oracle and/or its affiliates. All rights reserved.
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
4 *
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
5 * This code is free software; you can redistribute it and/or modify it
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
6 * under the terms of the GNU General Public License version 2 only, as
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
7 * published by the Free Software Foundation. Oracle designates this
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
8 * particular file as subject to the "Classpath" exception as provided
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
9 * by Oracle in the LICENSE file that accompanied this code.
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
10 *
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
11 * This code is distributed in the hope that it will be useful, but WITHOUT
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
14 * version 2 for more details (a copy is included in the LICENSE file that
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
15 * accompanied this code).
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
16 *
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
17 * You should have received a copy of the GNU General Public License version
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
18 * 2 along with this work; if not, write to the Free Software Foundation,
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
20 *
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
22 * or visit www.oracle.com if you need additional information or have any
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
23 * questions.
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
24 */
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
25 package com.oracle.truffle.interop.messages;
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
26
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
27 import com.oracle.truffle.api.interop.messages.*;
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
28
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
29 abstract class UnaryMessage implements Message {
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
30 protected final Object receiver;
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
31
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
32 protected UnaryMessage(Object receiver) {
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
33 this.receiver = receiver;
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
34 }
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
35
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
36 public Object getReceiver() {
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
37 return receiver;
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
38 }
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
39
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
40 public boolean matchStructure(Object message) {
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
41 if (message == null) {
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
42 return false;
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
43 }
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
44 if (this.getClass() != message.getClass()) {
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
45 return false;
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
46 }
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
47 UnaryMessage m1 = this;
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
48 UnaryMessage m2 = (UnaryMessage) message;
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
49 return MessageUtil.compareMessage(m1.getReceiver(), m2.getReceiver());
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
50 }
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
51
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
52 @Override
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
53 public abstract String toString();
556b6a4b36b2 Interop: add truffle.interop
Matthias Grimmer <grimmer@ssw.jku.at>
parents:
diff changeset
54 }