comparison graal/com.oracle.truffle.ruby.nodes/src/com/oracle/truffle/ruby/nodes/core/MatchDataNodes.java @ 13529:856c2c294f84

Merge.
author Christian Humer <christian.humer@gmail.com>
date Tue, 07 Jan 2014 18:53:04 +0100
parents 0fbee3eb71f0
children
comparison
equal deleted inserted replaced
13528:5a0c694ef735 13529:856c2c294f84
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 }