Mercurial > hg > graal-compiler
annotate graal/com.oracle.truffle.interop/src/com/oracle/truffle/interop/messages/UnaryMessage.java @ 21607:71b338926f2e
moved JVMCI classes into their own distributions (JBS:GRAAL-53)
author | Doug Simon <doug.simon@oracle.com> |
---|---|
date | Fri, 29 May 2015 22:27:38 +0200 |
parents | 556b6a4b36b2 |
children |
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 } |