--- a/WinWorkstation.st Mon Aug 24 18:38:24 1998 +0200
+++ b/WinWorkstation.st Mon Aug 24 18:50:13 1998 +0200
@@ -3529,11 +3529,11 @@
if (__isExternalAddress(windowId1)
&& __isExternalAddress(windowId2)
- && __bothSmallInteger(x, y)) {
+ && __bothSmallInteger(x1, y1)) {
w1 = _HWNDVal(windowId1);
w2 = _HWNDVal(windowId2);
- point.x = __intVal(x);
- point.y = __intVal(y);
+ point.x = __intVal(x1);
+ point.y = __intVal(y1);
DPRINTF(("TransPoint %x %d/%d ->",w1,point.x,point.y));
ClientToScreen(w1,&point);
ScreenToClient(w2,&point);
@@ -5086,8 +5086,7 @@
else if (__isFloat(startAngle)) {
angle1 = __floatVal(startAngle);
} else if (__isShortFloat(startAngle)) {
- f = __shortFloatVal(startAngle);
- angle1 = f * 64;
+ angle1 = __shortFloatVal(startAngle);
} else goto bad;
if (__isSmallInteger(angle))
@@ -5095,8 +5094,7 @@
else if (__isFloat(angle)) {
angle2 = __floatVal(angle);
} else if (__isShortFloat(angle)) {
- f = __shortFloatVal(angle);
- angle2 = f * 64;
+ angle2 = __shortFloatVal(angle);
} else goto bad;
if (__isExternalAddress(aGCId)
@@ -5490,8 +5488,7 @@
else if (__isFloat(startAngle)) {
angle1 = __floatVal(startAngle);
} else if (__isShortFloat(startAngle)) {
- f = __shortFloatVal(startAngle);
- angle1 = f * 64;
+ anfle1 = __shortFloatVal(startAngle);
} else goto bad;
if (__isSmallInteger(angle))
@@ -5499,8 +5496,7 @@
else if (__isFloat(angle)) {
angle2 = __floatVal(angle);
} else if (__isShortFloat(angle)) {
- f = __shortFloatVal(angle);
- angle2 = f * 64;
+ angle2 = __shortFloatVal(angle);
} else goto bad;
if (__isExternalAddress(aGCId)
@@ -9787,6 +9783,6 @@
!WinWorkstation class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.48 1998-08-24 16:36:59 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.49 1998-08-24 16:50:13 cg Exp $'
! !
WinWorkstation initialize!