• Tk の窓を移動するには関数 tk:loop を実行する必要があります．この関 数は無現ループを行なうので，実行中は Scheme の式を入力できなくなりま す．止めるにはコントロール-Cを押して下さい（しつこく何回か押さないと停止しな いことがあります）．

  > (tk:loop)  ;; 窓を移動する際はこれを実行
  ^C           ;; 移動が済んだら実行を止める
 

• (tk:loop) の実行中は（他の版と違って）CPU を消費します．

暫定版のソース変更箇所

c/sctop.c の 1558-1559行目をコメントアウト：
//        pthread_create(&pth, NULL, (void *)Tk_MainLoop, NULL);               
//        pthread_detach(pth);

c/other.c の 485行目の0をTCL_DONT_WAITへ変更：
    Tcl_DoOneEvent(TCL_DONT_WAIT);