diff options
Diffstat (limited to 'src/bltConfig.C')
-rw-r--r-- | src/bltConfig.C | 102 |
1 files changed, 0 insertions, 102 deletions
diff --git a/src/bltConfig.C b/src/bltConfig.C index 7368173..a263ac1 100644 --- a/src/bltConfig.C +++ b/src/bltConfig.C @@ -82,48 +82,6 @@ #include <stdarg.h> #include "bltInt.h" -#include "bltBgStyle.h" - -// Background - -static Tk_CustomOptionSetProc BackgroundSetProc; -static Tk_CustomOptionGetProc BackgroundGetProc; -Tk_ObjCustomOption backgroundObjOption = - { - "background", BackgroundSetProc, BackgroundGetProc, NULL, NULL, NULL - }; - -static int BackgroundSetProc(ClientData clientData, Tcl_Interp *interp, - Tk_Window tkwin, Tcl_Obj** objPtr, char* widgRec, - int offset, char* save, int flags) -{ - Blt_Background* backgroundPtr = (Blt_Background*)(widgRec + offset); - - if (*backgroundPtr) - Blt_FreeBackground(*backgroundPtr); - *backgroundPtr = NULL; - - int length; - const char* string = Tcl_GetStringFromObj(*objPtr, &length); - if (string) - *backgroundPtr = Blt_GetBackground(interp, tkwin, string); - else - return TCL_ERROR; - - return TCL_OK; -} - -static Tcl_Obj* BackgroundGetProc(ClientData clientData, Tk_Window tkwin, - char *widgRec, int offset) -{ - Blt_Background* backgroundPtr = (Blt_Background*)(widgRec + offset); - if (*backgroundPtr) { - const char* string = Blt_NameOfBackground(*backgroundPtr); - return Tcl_NewStringObj(string, -1); - } - else - return Tcl_NewStringObj("", -1); -} // Point static Tk_CustomOptionSetProc PointSetProc; @@ -576,66 +534,6 @@ static void ListFreeProc(ClientData clientData, Display* display, } } -/* BACKGROUND */ - -static Blt_OptionParseProc ObjToBackgroundProc; -static Blt_OptionPrintProc BackgroundToObjProc; -static Blt_OptionFreeProc BackgroundFreeProc; -Blt_CustomOption backgroundOption = -{ - ObjToBackgroundProc, BackgroundToObjProc, BackgroundFreeProc, (ClientData)0 -}; - -static int ObjToBackgroundProc(ClientData clientData, Tcl_Interp *interp, - Tk_Window tkwin, Tcl_Obj *objPtr, char *widgRec, - int offset, int flags) -{ - const char* string; - int length; - Blt_Background* backgroundPtr; - - backgroundPtr = (Blt_Background*)(widgRec + offset); - - if (*backgroundPtr) - Blt_FreeBackground(*backgroundPtr); - *backgroundPtr = NULL; - - string = Tcl_GetStringFromObj(objPtr, &length); - if (string) - *backgroundPtr = Blt_GetBackground(interp, tkwin, string); - else - return TCL_ERROR; - - return TCL_OK; -} - -static Tcl_Obj* BackgroundToObjProc(ClientData clientData, Tcl_Interp *interp, - Tk_Window tkwin, char *widgRec, - int offset, int flags) -{ - const char* string; - Blt_Background* backgroundPtr; - - backgroundPtr = (Blt_Background*)(widgRec + offset); - if (*backgroundPtr) { - string = Blt_NameOfBackground(*backgroundPtr); - return Tcl_NewStringObj(string, -1); - } - else - return Tcl_NewStringObj("", -1); -} - -static void BackgroundFreeProc(ClientData clientData, Display* display, - char *widgRec, int offset) -{ - Blt_Background* backgroundPtr; - - backgroundPtr = (Blt_Background*)(widgRec + offset); - if (*backgroundPtr) - Blt_FreeBackground(*backgroundPtr); - *backgroundPtr = NULL; -} - /* OBJECT */ static Blt_OptionParseProc ObjToObjectProc; |