--- a/RunArray.st Mon Oct 14 23:34:03 1996 +0200
+++ b/RunArray.st Tue Oct 15 22:35:55 1996 +0200
@@ -275,7 +275,7 @@
splitted."
|runSz runIndex runOffset len l1 l2 prevIdx nextIdx
- val newRuns newValues prevLen prevVal nextLen nextVal idx|
+ val newRuns prevLen prevVal nextLen nextVal idx|
runSz := contentsArray size.
@@ -932,5 +932,5 @@
!RunArray class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/RunArray.st,v 1.11 1996-05-18 17:29:02 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/RunArray.st,v 1.12 1996-10-15 20:35:49 cg Exp $'
! !
--- a/Text.st Mon Oct 14 23:34:03 1996 +0200
+++ b/Text.st Tue Oct 15 22:35:55 1996 +0200
@@ -337,8 +337,6 @@
"return true, if e1 includes e2.
e2 should be a single emphasis."
- |ne|
-
e1 isNil ifTrue:[^ false].
e2 isNil ifTrue:[^ false].
e1 == e2 ifTrue:[^ true].
@@ -368,8 +366,6 @@
Otherwise, if a n association with that key is included, return the value.
Otherwise, return nil."
- |ne|
-
e isNil ifTrue:[^ nil].
key == e ifTrue:[^ e].
"/ e isSymbol ifTrue:[^ nil].
@@ -1048,7 +1044,7 @@
widthOn:aGC
"return the number of device units, required on aGC's device"
- |savedFont savedPaint boldFont italicFont bold italic pos f l device|
+ |savedFont boldFont italicFont bold italic pos f l device|
device := aGC graphicsDevice.
@@ -1128,6 +1124,6 @@
!Text class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.28 1996-08-23 08:30:04 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/Text.st,v 1.29 1996-10-15 20:35:53 cg Exp $'
! !
Text initialize!
--- a/UnitConverter.st Mon Oct 14 23:34:03 1996 +0200
+++ b/UnitConverter.st Tue Oct 15 22:35:55 1996 +0200
@@ -314,7 +314,7 @@
to destUnit (symbolic); return nil, if the conversion is
unknown."
- |u factor conversions alias rslt sU dU|
+ |u conversions alias rslt sU dU|
"/ somehow, recursion must end ...
sourceUnit == destUnit ifTrue:[
@@ -538,6 +538,6 @@
!UnitConverter class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/UnitConverter.st,v 1.5 1996-06-04 15:15:02 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/UnitConverter.st,v 1.6 1996-10-15 20:35:55 cg Exp $'
! !
UnitConverter initialize!