[Vm-dev] [commit][3153] Format the morphed float timestamps correctly.

commits at squeakvm.org commits at squeakvm.org
Wed Nov 26 22:45:08 UTC 2014


Revision: 3153
Author:   eliot
Date:     2014-11-26 14:45:03 -0800 (Wed, 26 Nov 2014)
Log Message:
-----------
Format the morphed float timestamps correctly.

Modified Paths:
--------------
    branches/Cog/image/MorphFloat.st

Modified: branches/Cog/image/MorphFloat.st
===================================================================
--- branches/Cog/image/MorphFloat.st	2014-11-26 19:57:25 UTC (rev 3152)
+++ branches/Cog/image/MorphFloat.st	2014-11-26 22:45:03 UTC (rev 3153)
@@ -12,10 +12,10 @@
 							classVariableNames: ''
 							poolDictionaries: ''
 							category: 'Kernel-Numbers'.
-	'!!SoonToBeFloat class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 7:54''!!
+	'!!SoonToBeFloat class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 07:54''!!
 basicNew
 	^Float basicNew: 2!! !!
-!!SoonToBeFloat class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 7:54''!!
+!!SoonToBeFloat class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 07:54''!!
 basicNew: anInteger
 	^Float basicNew: 2!! !!' readStream fileIn.
 
@@ -57,14 +57,14 @@
 		on: AttemptToWriteReadOnlyGlobal
 		do: [:ex| ex resume: true].
 
-	'!!Float class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 7:54''!!
+	'!!Float class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 07:54''!!
 basicNew
 	^BoxedFloat64 basicNew: 2!! !!
 
-!!Float class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 7:54''!!
+!!Float class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 07:54''!!
 basicNew: anInteger
 	^BoxedFloat64 basicNew: 2!! !!
-!!BoxedFloat64 class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 7:54''!!
+!!BoxedFloat64 class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 07:54''!!
 basicNew: sizeRequested 
 	"Primitive. Answer an instance of this class with the number
 	 of indexable variables specified by the argument, sizeRequested.
@@ -82,10 +82,10 @@
 				[self error: ''a Float shall always have two slots'']].
 	self primitiveFailed!! !!
 
-!!SmallFloat64 class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 7:54''!!
+!!SmallFloat64 class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 07:54''!!
 basicNew: anInteger
 	^self basicNew!! !!
-!!SmallFloat64 class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 7:54''!!
+!!SmallFloat64 class methodsFor: ''instance creation'' stamp: ''eem 11/25/2014 07:54''!!
 basicNew
 	self error: ''SmallFloat64s can only be created by performing arithmetic''!! !!' readStream fileIn.
 
@@ -119,13 +119,13 @@
 		smallFloat
 			compile: code
 			classified: (boxedFloat organization categoryOfElement: s)
-			withStamp: 'eem 11/25/2014 7:54'
+			withStamp: 'eem 11/25/2014 07:54'
 			notifying: nil].
 	smallFloat organization sortCategories.
 
 	boxedFloat comment: 'My instances hold 64-bit Floats in heap objects.  This is the only representation on 32-bit systems.  But on 64-bit systems SmallFloat64 holds a subset of the full 64-bit double-precision range in immediate objects.'
-		stamp: 'eem 11/25/2014 7:54'.
+		stamp: 'eem 11/25/2014 07:54'.
 	smallFloat comment: 'My instances represent 64-bit Floats whose exponent fits in 8 bits as immediate objects.  This representation is only available on 64-bit systems, not 32-bit systems.'
-		stamp: 'eem 11/25/2014 7:54'.
+		stamp: 'eem 11/25/2014 07:54'.
 
 	Undeclared removeUnreferencedKeys]


More information about the Vm-dev mailing list