Mercurial > hg > graal-compiler
comparison graal/com.oracle.truffle.ruby.nodes/src/com/oracle/truffle/ruby/nodes/core/MatchDataNodes.java @ 13514:0fbee3eb71f0
Ruby: import project.
author | Chris Seaton <chris.seaton@oracle.com> |
---|---|
date | Mon, 06 Jan 2014 17:12:09 +0000 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
13513:64a23ce736a0 | 13514:0fbee3eb71f0 |
---|---|
1 /* | |
2 * Copyright (c) 2013 Oracle and/or its affiliates. All rights reserved. This | |
3 * code is released under a tri EPL/GPL/LGPL license. You can use it, | |
4 * redistribute it and/or modify it under the terms of the: | |
5 * | |
6 * Eclipse Public License version 1.0 | |
7 * GNU General Public License version 2 | |
8 * GNU Lesser General Public License version 2.1 | |
9 */ | |
10 package com.oracle.truffle.ruby.nodes.core; | |
11 | |
12 import com.oracle.truffle.api.*; | |
13 import com.oracle.truffle.api.dsl.*; | |
14 import com.oracle.truffle.ruby.runtime.*; | |
15 import com.oracle.truffle.ruby.runtime.core.*; | |
16 import com.oracle.truffle.ruby.runtime.core.array.*; | |
17 | |
18 @CoreClass(name = "MatchData") | |
19 public abstract class MatchDataNodes { | |
20 | |
21 @CoreMethod(names = "[]", minArgs = 1, maxArgs = 1) | |
22 public abstract static class GetIndexNode extends CoreMethodNode { | |
23 | |
24 public GetIndexNode(RubyContext context, SourceSection sourceSection) { | |
25 super(context, sourceSection); | |
26 } | |
27 | |
28 public GetIndexNode(GetIndexNode prev) { | |
29 super(prev); | |
30 } | |
31 | |
32 @Specialization | |
33 public Object getIndex(RubyMatchData matchData, int index) { | |
34 return matchData.getValues()[index]; | |
35 } | |
36 | |
37 } | |
38 | |
39 @CoreMethod(names = "to_a", maxArgs = 0) | |
40 public abstract static class ToANode extends CoreMethodNode { | |
41 | |
42 public ToANode(RubyContext context, SourceSection sourceSection) { | |
43 super(context, sourceSection); | |
44 } | |
45 | |
46 public ToANode(ToANode prev) { | |
47 super(prev); | |
48 } | |
49 | |
50 @Specialization | |
51 public RubyArray toA(RubyMatchData matchData) { | |
52 return RubyArray.specializedFromObjects(getContext().getCoreLibrary().getArrayClass(), matchData.getValues()); | |
53 } | |
54 | |
55 } | |
56 | |
57 @CoreMethod(names = "values_at", isSplatted = true) | |
58 public abstract static class ValuesAtNode extends CoreMethodNode { | |
59 | |
60 public ValuesAtNode(RubyContext context, SourceSection sourceSection) { | |
61 super(context, sourceSection); | |
62 } | |
63 | |
64 public ValuesAtNode(ValuesAtNode prev) { | |
65 super(prev); | |
66 } | |
67 | |
68 @Specialization | |
69 public RubyArray valuesAt(RubyMatchData matchData, Object[] args) { | |
70 final int[] indicies = new int[args.length]; | |
71 | |
72 for (int n = 0; n < args.length; n++) { | |
73 indicies[n] = (int) args[n]; | |
74 } | |
75 | |
76 return RubyArray.specializedFromObjects(getContext().getCoreLibrary().getArrayClass(), matchData.valuesAt(indicies)); | |
77 } | |
78 | |
79 } | |
80 | |
81 } |