You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
Copy file name to clipboardExpand all lines: CHANGELOG.md
+7-3Lines changed: 7 additions & 3 deletions
Display the source diff
Display the rich diff
Original file line number
Diff line number
Diff line change
@@ -1,9 +1,13 @@
1
1
# 1.0 RC 13
2
2
3
-
New features:
3
+
New features:
4
+
5
+
* new JUL-like logging infrastructure backed by Truffle
6
+
* FastR options backed by Truffle now. New command-line format - i.e. bin/r --R.PerformanceWarning="true". Also configurable via org.graal.polyglot.Context.Builder.
7
+
8
+
Bug fixes:
4
9
5
-
* new JUL-like logging infrastructure backed by Truffle
6
-
* FastR options backed by Truffle now. New command-line format - i.e. bin/r --R.PerformanceWarning="true". Also configurable via org.graal.polyglot.Context.Builder.
10
+
* when using GNU-R graphics (-UseInternalGridGraphics) FastR would still override the graphics package R functions
# We evaluate the non-missing arguments to simulate the function effects.
39
-
# Some arguments must be ignored, because they are a promise to a value
40
-
# that will be calculated inside the function before the argument is accessed
41
-
sigNames<- setdiff(base::names(sig), ignore)
42
-
replacementFun<-function(...) {
43
-
if (is.null(sigNames)) {
44
-
return(invisible(list(...)));
45
-
}
46
-
missingExpr<- quote(missing(x))
47
-
for (ninsigNames) {
48
-
missingExpr[[2]] <- as.symbol(n)
49
-
if (!eval(missingExpr)) {
50
-
get(n)
38
+
if (.fastr.option('IgnoreGraphicsCalls')) {
39
+
# We evaluate the non-missing arguments to simulate the function effects.
40
+
# Some arguments must be ignored, because they are a promise to a value
41
+
# that will be calculated inside the function before the argument is accessed
42
+
sigNames<- setdiff(base::names(sig), ignore)
43
+
replacementFun<-function(...) {
44
+
if (is.null(sigNames)) {
45
+
return(invisible(list(...)));
51
46
}
47
+
missingExpr<- quote(missing(x))
48
+
for (ninsigNames) {
49
+
missingExpr[[2]] <- as.symbol(n)
50
+
if (!eval(missingExpr)) {
51
+
get(n)
52
+
}
53
+
}
54
+
invisible(NULL);
55
+
}
56
+
} else {
57
+
replacementFun<-function(...) {
58
+
warning(paste0(name, " not supported.", " Note: FastR does not support graphics package and most of its functions. Please use grid package or grid based packages like lattice instead."))
59
+
NULL
52
60
}
53
-
invisible(NULL);
54
61
}
55
-
} else {
56
-
replacementFun<-function(...) {
57
-
warning(paste0(name, " not supported.", " Note: FastR does not support graphics package and most of its functions. Please use grid package or grid based packages like lattice instead."))
grid.text("FastR does not support graphics package and most of its functions. \nThe 'plot' function is emulated to a small extent. \nPlease use grid package or grid based packages like lattice or ggplot2 instead.", gp=gpar(fontsize=10))
112
+
graphicsWarning()
113
+
invisible()
108
114
}
109
115
110
-
grid.text("FastR does not support graphics package and most of its functions. \nThe 'plot' function is emulated to a small extent. \nPlease use grid package or grid based packages like lattice or ggplot2 instead.", gp=gpar(fontsize=10))
111
-
graphicsWarning()
112
-
invisible()
113
-
}
114
-
115
-
# Note: explicitly supported functions: din
116
-
# Note: harmless functions that we do not override: co.intervals, hist.default, axTicks
117
-
# Note: S3 dispatch functions that may dispatch to lattice/ggplot2/etc. implementation: hist, contour, lines, pairs, points, text
118
-
# Note: we ignore plot.new because Shiny probably uses it for getting coordinates, but not for plotting itself
116
+
# Note: explicitly supported functions: din
117
+
# Note: harmless functions that we do not override: co.intervals, hist.default, axTicks
118
+
# Note: S3 dispatch functions that may dispatch to lattice/ggplot2/etc. implementation: hist, contour, lines, pairs, points, text
119
+
# Note: we ignore plot.new because Shiny probably uses it for getting coordinates, but not for plotting itself
119
120
120
-
# Special case of grconvertX/Y used in Shiny
121
-
grconvertX<-function(x, from, to) if (from=="user"&&to=="nfc") round(x) else graphicsWarning("gcconvertX")(x, from, to)
122
-
grconvertY<-function(x, from, to) if (from=="user"&&to=="nfc") round(x) else graphicsWarning("gcconvertX")(x, from, to)
123
-
plot.new<-function(...) { } # just ignore
121
+
# Special case of grconvertX/Y used in Shiny
122
+
grconvertX<-function(x, from, to) if (from=="user"&&to=="nfc") round(x) else graphicsWarning("gcconvertX")(x, from, to)
123
+
grconvertY<-function(x, from, to) if (from=="user"&&to=="nfc") round(x) else graphicsWarning("gcconvertX")(x, from, to)
Copy file name to clipboardExpand all lines: com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/foreign/CallAndExternalFunctions.java
0 commit comments