@@ -59,34 +59,6 @@ Pool = R6::R6Class("Pool",
5959 private $ master $ add_pkg(elm )
6060 },
6161
62- # ## START pre-0.9 compatibility functions (deprecated)
63- set_common_data = function (... , export = list (), pkgs = c(), token = " " ) {
64- .Deprecated(" env" )
65- do.call(self $ env , c(list (... ), export ))
66- if (length(pkgs ) > 0 )
67- do.call(self $ pkg , as.list(pkgs ))
68- private $ token = token
69- },
70- send_common_data = function () {
71- .Deprecated(" handled implicitly" )
72- self $ send()
73- },
74- send_shutdown_worker = function () {
75- .Deprecated(" send_shutdown" )
76- self $ send_shutdown()
77- },
78- send_call = function (expr , env = list (), ref = substitute(expr )) {
79- .Deprecated(" send" )
80- pcall = quote(substitute(expr ))
81- do.call(self $ send , c(list (cmd = eval(pcall )), env ))
82- },
83- receive_data = function () {
84- .Deprecated(" recv" )
85- rd = self $ recv()
86- list (result = rd , warnings = c(), errors = c(), token = private $ token )
87- },
88- # ## END pre-0.9 compatibility functions (deprecated)
89-
9062 send_eval = function (cmd , ... ) {
9163 pcall = quote(substitute(cmd ))
9264 cmd = as.expression(do.call(substitute , list (eval(pcall ), env = list (... ))))
@@ -145,8 +117,6 @@ Pool = R6::R6Class("Pool",
145117 ),
146118
147119 private = list (
148- token = NULL , # ## pre-0.9 compatibility functions (deprecated)
149-
150120 master = NULL ,
151121 addr = NULL ,
152122 timer = NULL ,
0 commit comments