Mercurial > hg > graal-jvmci-8
comparison graal/com.oracle.truffle.ruby.runtime/src/com/oracle/truffle/ruby/runtime/debug/RubyProcAfterLocalProbe.java @ 13569:1894412de0ed
Ruby: major upgrade in debugging support, mainly for navigation: step, next (passing over calls), return (from enclosing function), etc. Also a few bug fixes.
author | Michael Van De Vanter <michael.van.de.vanter@oracle.com> |
---|---|
date | Wed, 08 Jan 2014 14:03:36 -0800 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
13568:f29a358cf3da | 13569:1894412de0ed |
---|---|
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.runtime.debug; | |
11 | |
12 import com.oracle.truffle.api.frame.*; | |
13 import com.oracle.truffle.api.nodes.*; | |
14 import com.oracle.truffle.ruby.runtime.*; | |
15 import com.oracle.truffle.ruby.runtime.core.*; | |
16 | |
17 /** | |
18 * A probe for instrumenting a Ruby program with a Ruby procedure to run on the return value from a | |
19 * local assignment. | |
20 */ | |
21 public final class RubyProcAfterLocalProbe extends RubyLocalProbe { | |
22 | |
23 private final RubyProc proc; | |
24 | |
25 public RubyProcAfterLocalProbe(RubyContext context, MethodLocal local, RubyProc proc) { | |
26 super(context, local, false); | |
27 this.proc = proc; | |
28 } | |
29 | |
30 @Override | |
31 public void leave(Node astNode, VirtualFrame frame) { | |
32 proc.call(frame.pack()); | |
33 } | |
34 | |
35 @Override | |
36 public void leave(Node astNode, VirtualFrame frame, boolean result) { | |
37 proc.call(frame.pack(), result); | |
38 } | |
39 | |
40 @Override | |
41 public void leave(Node astNode, VirtualFrame frame, int result) { | |
42 proc.call(frame.pack(), result); | |
43 } | |
44 | |
45 @Override | |
46 public void leave(Node astNode, VirtualFrame frame, double result) { | |
47 proc.call(frame.pack(), result); | |
48 } | |
49 | |
50 @Override | |
51 public void leave(Node astNode, VirtualFrame frame, Object result) { | |
52 proc.call(frame.pack(), result); | |
53 } | |
54 | |
55 @Override | |
56 public void leaveExceptional(Node astNode, VirtualFrame frame, Exception e) { | |
57 proc.call(frame.pack()); | |
58 } | |
59 } |