summaryrefslogtreecommitdiffstats
path: root/unix/tkUnixScale.c
diff options
context:
space:
mode:
Diffstat (limited to 'unix/tkUnixScale.c')
-rw-r--r--unix/tkUnixScale.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/unix/tkUnixScale.c b/unix/tkUnixScale.c
index 9c6e4f3..a603432 100644
--- a/unix/tkUnixScale.c
+++ b/unix/tkUnixScale.c
@@ -50,9 +50,9 @@ static void DisplayVerticalValue(TkScale *scalePtr,
TkScale *
TkpCreateScale(
- Tk_Window tkwin)
+ TCL_UNUSED(Tk_Window))
{
- return ckalloc(sizeof(TkScale));
+ return (TkScale *)ckalloc(sizeof(TkScale));
}
/*
@@ -256,7 +256,7 @@ DisplayVerticalScale(
static void
DisplayVerticalValue(
- register TkScale *scalePtr, /* Information about widget in which to
+ TkScale *scalePtr, /* Information about widget in which to
* display value. */
Drawable drawable, /* Pixmap or window in which to draw the
* value. */
@@ -267,7 +267,7 @@ DisplayVerticalValue(
* specified in pixels. */
const char *format) /* Format string to use for the value */
{
- register Tk_Window tkwin = scalePtr->tkwin;
+ Tk_Window tkwin = scalePtr->tkwin;
int y, width, length;
char valueString[TCL_DOUBLE_SPACE];
Tk_FontMetrics fm;
@@ -325,7 +325,7 @@ DisplayHorizontalScale(
* to reflect the part of the window that was
* redrawn. */
{
- register Tk_Window tkwin = scalePtr->tkwin;
+ Tk_Window tkwin = scalePtr->tkwin;
int x, y, width, height, shadowWidth;
double tickInterval = scalePtr->tickInterval;
Tk_3DBorder sliderBorder;
@@ -479,7 +479,7 @@ DisplayHorizontalScale(
static void
DisplayHorizontalValue(
- register TkScale *scalePtr, /* Information about widget in which to
+ TkScale *scalePtr, /* Information about widget in which to
* display value. */
Drawable drawable, /* Pixmap or window in which to draw the
* value. */
@@ -490,7 +490,7 @@ DisplayHorizontalValue(
* in pixels. */
const char *format) /* Format string to use for the value */
{
- register Tk_Window tkwin = scalePtr->tkwin;
+ Tk_Window tkwin = scalePtr->tkwin;
int x, y, length, width;
char valueString[TCL_DOUBLE_SPACE];
Tk_FontMetrics fm;
@@ -546,7 +546,7 @@ void
TkpDisplayScale(
ClientData clientData) /* Widget record for scale. */
{
- TkScale *scalePtr = (TkScale *) clientData;
+ TkScale *scalePtr = (TkScale *)clientData;
Tk_Window tkwin = scalePtr->tkwin;
Tcl_Interp *interp = scalePtr->interp;
Pixmap pixmap;