[rkward-tracker] [ rkward-Bugs-2861059 ] Tk causes hangs and SEGVs

[SourceForge.net]

Bugs item #2861059, was opened at 2009-09-17 17:14
Message generated for change (Tracker Item Submitted) made by keepiru
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=459007&aid=2861059&group_id=50231

Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: None
Group: CRASH
Status: Open
Resolution: None
Priority: 5
Private: No
Submitted By: Keepiru (keepiru)
Assigned to: Nobody/Anonymous (nobody)
Summary: Tk causes hangs and SEGVs

Initial Comment:
Example from TkWidgetcmds help:
try:
	require(tcltk)
	tt <- tktoplevel()
	tkpack(txt.w <- tktext(tt))
	tkinsert(txt.w, "0.0", "plot(1:10)")
	eval.txt <- function() eval(parse(text=tclvalue(tkget(txt.w, "0.0", "end"))))
	tkpack(but.w <- tkbutton(tt,text="Submit", command=eval.txt))
Click the button.
Result:  RKWward hangs.

Example from slider help:
try:
	require(relax)
	plot.sample.norm<-function(){
	refresh.code<-function(...){
	mu<-slider(no=1); sd<-slider(no=2); n<-slider(no=3)
	x<-rnorm(n,mu,sd)
	plot(x)
	}
	slider(refresh.code,sl.names=c("value of mu","value of sd","n number of observations"),
		sl.mins=c(-10,.01,5),sl.maxs=c(+10,50,100),sl.deltas=c(.01,.01,1),sl.defaults=c(0,1,20))
	}
	plot.sample.norm()
Slide a slider.
result:  SIGSEGV

----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=459007&aid=2861059&group_id=50231