The R Project SVN R

Rev

Rev 30912 | Rev 42333 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 30912 Rev 30915
Line 76... Line 76...
76
  \code{\link{removeTaskCallback}},
76
  \code{\link{removeTaskCallback}},
77
  \code{\link{getTaskCallbackNames}}\\
77
  \code{\link{getTaskCallbackNames}}\\
78
  \url{http://developer.r-project.org/TaskHandlers.pdf}  
78
  \url{http://developer.r-project.org/TaskHandlers.pdf}  
79
}
79
}
80
\examples{
80
\examples{
81
   # create the manager
81
# create the manager
82
  h <- taskCallbackManager()
82
h <- taskCallbackManager()
83
 
83
 
84
   # add a callback
84
# add a callback
85
  h$add(function(expr, value, ok, visible) {
85
h$add(function(expr, value, ok, visible) {
86
                         cat("In handler\n")
86
		       cat("In handler\n")
87
                         return(TRUE)
87
		       return(TRUE)
88
                       }, name = "simpleHandler")
88
		     }, name = "simpleHandler")
89
 
89
 
90
   # look at the internal callbacks.
90
# look at the internal callbacks.
91
  getTaskCallbackNames()
91
getTaskCallbackNames()
92
 
92
 
93
   # look at the R-level callbacks
93
# look at the R-level callbacks
94
  names(h$callback())
94
names(h$callback())
95
 
95
 
96
   #
-
 
97
  getTaskCallbackNames()
96
getTaskCallbackNames()
98
  removeTaskCallback("R-taskCallbackManager")
97
removeTaskCallback("R-taskCallbackManager")
99
}
98
}
100
\keyword{environment}
99
\keyword{environment}