1 /* tkstuff.h 2 */ 3 4 #ifdef USE_TK 5 EXT char* ttk_keys; 6 7 EXT int ttk_idle_flag; 8 9 /* if true, we are really running Tk */ 10 EXT int ttk_running INIT(0); 11 12 /* if true, allow update via ttk_do_waiting_events() */ 13 EXT int ttk_do_waiting_flag INIT(1); 14 #endif 15 16 /* if true, we are really running TCL */ 17 EXT int ttcl_running INIT(0); 18 19 /* DON'T EDIT BELOW THIS LINE OR YOUR CHANGES WILL BE LOST! */ 20 21 #ifdef USE_TK 22 void ttk_do_waiting_events _((void)); 23 void ttk_wait_for_input _((void)); 24 #endif 25 void ttcl_init _((void)); 26 void ttcl_finalize _((int)); 27 void ttcl_set_int _((char*,int)); 28 void ttcl_set_str _((char*,char*)); 29 int ttcl_get_int _((char*)); 30 char* ttcl_get_str _((char*)); 31 void ttcl_eval _((char*)); 32