add R_Busy symbol

lukasstadler · ansalond · commit caee8a749385 · 2018-06-26T19:50:17.000+02:00
(cherry picked from commit b843c24)
diff --git a/com.oracle.truffle.r.native/fficall/src/truffle_nfi/Rembedded.c b/com.oracle.truffle.r.native/fficall/src/truffle_nfi/Rembedded.c
@@ -368,7 +368,11 @@ void uR_ClearerrConsole(void) {
 }
 
 void uR_Busy(int x) {
-    unimplemented("R_Busy");
+    // default - do nothing
+}
+
+void R_Busy(int which) {
+  ptr_R_Busy(which);
 }
 
 void R_SizeFromEnv(Rstart rs) {

Original file line number	Diff line number	Diff line change
`@@ -368,7 +368,11 @@ void uR_ClearerrConsole(void) {`
`368`	`368`	`}`
`369`	`369`
`370`	`370`	`void uR_Busy(int x) {`
`371`		`- unimplemented("R_Busy");`
	`371`	`+ // default - do nothing`
	`372`	`+}`
	`373`	`+`
	`374`	`+void R_Busy(int which) {`
	`375`	`+ ptr_R_Busy(which);`
`372`	`376`	`}`
`373`	`377`
`374`	`378`	`void R_SizeFromEnv(Rstart rs) {`