Skip to content
Snippets Groups Projects
Commit 3fd50ca2 authored by Lukas Stadler's avatar Lukas Stadler
Browse files

put Assign fallback behind TruffleBoundary

parent bb529964
Branches
No related tags found
No related merge requests found
......@@ -25,6 +25,7 @@ package com.oracle.truffle.r.nodes.builtin.base;
import static com.oracle.truffle.r.runtime.RBuiltinKind.*;
import com.oracle.truffle.api.CompilerDirectives.CompilationFinal;
import com.oracle.truffle.api.CompilerDirectives.TruffleBoundary;
import com.oracle.truffle.api.dsl.*;
import com.oracle.truffle.api.utilities.*;
import com.oracle.truffle.r.nodes.builtin.*;
......@@ -105,8 +106,8 @@ public abstract class Assign extends RInvisibleBuiltinNode {
@SuppressWarnings("unused")
@Fallback
@TruffleBoundary
protected Object assignFallback(Object xVec, Object value, Object envir, Object inherits) {
errorProfile.enter();
if (RRuntime.asString(xVec) == null) {
throw RError.error(this, RError.Message.INVALID_FIRST_ARGUMENT);
} else if (!(envir instanceof REnvironment)) {
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment