diff options
author | Kevin Walzer <kw@codebykevin.com> | 2021-05-07 20:58:09 (GMT) |
---|---|---|
committer | Kevin Walzer <kw@codebykevin.com> | 2021-05-07 20:58:09 (GMT) |
commit | 2df69ce47b11d6fb46cd983002825ee006254975 (patch) | |
tree | 2a7d29abb13ef8da24cd2c941fb1f356ce5fd52e /win | |
parent | 8c12b56e5d09af1b345f0d91a8b8f59e3bad5404 (diff) | |
download | tk-2df69ce47b11d6fb46cd983002825ee006254975.zip tk-2df69ce47b11d6fb46cd983002825ee006254975.tar.gz tk-2df69ce47b11d6fb46cd983002825ee006254975.tar.bz2 |
Minor tweaks
Diffstat (limited to 'win')
-rw-r--r-- | win/tkWinHDC.c | 6 | ||||
-rw-r--r-- | win/tkWinHDC.h | 2 | ||||
-rw-r--r-- | win/tkWinPrint.c | 4 |
3 files changed, 7 insertions, 5 deletions
diff --git a/win/tkWinHDC.c b/win/tkWinHDC.c index daca149..9464f07 100644 --- a/win/tkWinHDC.c +++ b/win/tkWinHDC.c @@ -17,7 +17,7 @@ /* *---------------------------------------------------------------------- * - * Hdc_build_name -- + * hdc_build_name -- * * Creates HDC name. * @@ -27,7 +27,7 @@ *---------------------------------------------------------------------- */ -static const char *Hdc_build_name(int type) +static const char * hdc_build_name(int type) { const char *prefix; Tcl_HashEntry *data; @@ -80,7 +80,7 @@ const char * hdc_create (Tcl_Interp *interp, void *ptr, int type) pval->addr = ptr; pval->type = type; - name = Hdc_build_name(type); + name = hdc_build_name(type); if ( ( entry = Tcl_CreateHashEntry(&hdcs, name, &status)) != 0 ) Tcl_SetHashValue(entry, (ClientData)pval); return name; diff --git a/win/tkWinHDC.h b/win/tkWinHDC.h index c83c894..e9d4c1b 100644 --- a/win/tkWinHDC.h +++ b/win/tkWinHDC.h @@ -26,4 +26,4 @@ int hdc_delete (Tcl_Interp *interp, const char *hdcname); const char * hdc_prefixof (Tcl_Interp *interp, int type, const char *newprefix); int hdc_typeof (Tcl_Interp *interp, const char *hdcname); void * hdc_get (Tcl_Interp *interp, const char *hdcname); -static const char *Hdc_build_name(int type);
\ No newline at end of file +static const char *hdc_build_name(int type); diff --git a/win/tkWinPrint.c b/win/tkWinPrint.c index 2157287..d6a6ea5 100644 --- a/win/tkWinPrint.c +++ b/win/tkWinPrint.c @@ -22,7 +22,7 @@ #include <string.h> #include <stdlib.h> #include <math.h> - +#include "tkWinHDC.h" /* Initialize variables for later use. */ static PRINTDLG pd; @@ -345,6 +345,8 @@ int PrintGetHDC(ClientData clientData, Tcl_Interp *interp, int argc, Tcl_Obj *co } get_hdc(); + char hdcbuffer[20]; + sprintf(hdcbuffer, "the hdc is 0x%lx", hDC); return TCL_OK; } |