diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2019-01-18 18:23:06 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2019-01-18 18:23:06 (GMT) |
commit | bf0cc9887939cac3d9b488fdfd8180d5bef851ab (patch) | |
tree | b92b47d5935345436363ef0b661199545bec40b1 /ds9/macos/ds9.C | |
parent | a51d63de1a6b963f9671367831e51aaa5bc9474a (diff) | |
download | blt-bf0cc9887939cac3d9b488fdfd8180d5bef851ab.zip blt-bf0cc9887939cac3d9b488fdfd8180d5bef851ab.tar.gz blt-bf0cc9887939cac3d9b488fdfd8180d5bef851ab.tar.bz2 |
clean up internal_error
Diffstat (limited to 'ds9/macos/ds9.C')
-rw-r--r-- | ds9/macos/ds9.C | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/ds9/macos/ds9.C b/ds9/macos/ds9.C index 4552442..f5d21b8 100644 --- a/ds9/macos/ds9.C +++ b/ds9/macos/ds9.C @@ -48,16 +48,6 @@ extern "C" { int Tkmacosx_Init(Tcl_Interp*); } -Tcl_Interp *global_interp; - -void internalError(const char* msg) -{ - Tcl_SetVar2(global_interp, "ds9", "msg", msg, TCL_GLOBAL_ONLY); - Tcl_SetVar2(global_interp, "ds9", "msg,level", "error", TCL_GLOBAL_ONLY); -} - -extern char* dupstr(const char* str); - #define PATHSIZE 2048 int SAOLocalMainHook(int* argcPtr, char*** argvPtr) { @@ -90,6 +80,7 @@ int SAOLocalMainHook(int* argcPtr, char*** argvPtr) return TCL_OK; } +extern Tcl_Interp *global_interp; int SAOAppInit(Tcl_Interp *interp) { // save interp for cputs function |