Skip to content
Snippets Groups Projects
Commit 3858779b authored by Michael Haupt's avatar Michael Haupt
Browse files

fix debug.dump builtin

parent 7a7839d4
Branches
No related tags found
No related merge requests found
...@@ -25,7 +25,6 @@ package com.oracle.truffle.r.nodes.builtin.debug; ...@@ -25,7 +25,6 @@ package com.oracle.truffle.r.nodes.builtin.debug;
import static com.oracle.truffle.r.runtime.RBuiltinKind.*; import static com.oracle.truffle.r.runtime.RBuiltinKind.*;
import com.oracle.truffle.api.dsl.*; import com.oracle.truffle.api.dsl.*;
import com.oracle.truffle.api.impl.*;
import com.oracle.truffle.r.nodes.*; import com.oracle.truffle.r.nodes.*;
import com.oracle.truffle.r.nodes.access.*; import com.oracle.truffle.r.nodes.access.*;
import com.oracle.truffle.r.nodes.builtin.*; import com.oracle.truffle.r.nodes.builtin.*;
...@@ -61,7 +60,7 @@ public abstract class DebugDumpBuiltin extends RBuiltinNode { ...@@ -61,7 +60,7 @@ public abstract class DebugDumpBuiltin extends RBuiltinNode {
@Specialization @Specialization
public Object dump(RFunction function) { public Object dump(RFunction function) {
controlVisibility(); controlVisibility();
String source = ((RRootNode) ((DefaultCallTarget) function.getTarget()).getRootNode()).getSourceCode(); String source = ((RRootNode) function.getTarget().getRootNode()).getSourceCode();
Utils.dumpFunction("dump: " + (source.length() <= FUNCTION_LENGTH_LIMIT ? source : source.substring(0, FUNCTION_LENGTH_LIMIT) + "..."), function); Utils.dumpFunction("dump: " + (source.length() <= FUNCTION_LENGTH_LIMIT ? source : source.substring(0, FUNCTION_LENGTH_LIMIT) + "..."), function);
return RNull.instance; return RNull.instance;
} }
......
...@@ -27,12 +27,11 @@ import java.nio.charset.*; ...@@ -27,12 +27,11 @@ import java.nio.charset.*;
import java.util.*; import java.util.*;
import com.oracle.truffle.api.*; import com.oracle.truffle.api.*;
import com.oracle.truffle.api.source.*; import com.oracle.truffle.api.CompilerDirectives.SlowPath;
import com.oracle.truffle.api.CompilerDirectives.*;
import com.oracle.truffle.api.frame.*; import com.oracle.truffle.api.frame.*;
import com.oracle.truffle.api.frame.FrameInstance.*; import com.oracle.truffle.api.frame.FrameInstance.FrameAccess;
import com.oracle.truffle.api.impl.*;
import com.oracle.truffle.api.nodes.*; import com.oracle.truffle.api.nodes.*;
import com.oracle.truffle.api.source.*;
import com.oracle.truffle.r.runtime.data.*; import com.oracle.truffle.r.runtime.data.*;
public final class Utils { public final class Utils {
...@@ -118,7 +117,7 @@ public final class Utils { ...@@ -118,7 +117,7 @@ public final class Utils {
public static void dumpFunction(String groupName, RFunction function) { public static void dumpFunction(String groupName, RFunction function) {
GraphPrintVisitor graphPrinter = new GraphPrintVisitor(); GraphPrintVisitor graphPrinter = new GraphPrintVisitor();
DefaultCallTarget callTarget = (DefaultCallTarget) function.getTarget(); RootCallTarget callTarget = function.getTarget();
if (callTarget != null) { if (callTarget != null) {
graphPrinter.beginGroup(groupName); graphPrinter.beginGroup(groupName);
graphPrinter.beginGraph(RRuntime.toString(function)).visit(callTarget.getRootNode()); graphPrinter.beginGraph(RRuntime.toString(function)).visit(callTarget.getRootNode());
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment