--- a/ArithmeticValue.st	Tue Dec 16 13:20:28 2014 +0100
+++ b/ArithmeticValue.st	Tue Dec 16 13:21:57 2014 +0100
@@ -505,6 +505,24 @@
 
 !ArithmeticValue methodsFor:'converting'!
 
+as32BitIEEEFloatBytesMSB:msb
+    ^ self asShortFloat digitBytesMSB:msb
+
+    "
+        2  as32BitIEEEFloatBytesMSB:true
+        2.0  as32BitIEEEFloatBytesMSB:true
+    "
+!
+
+as64BitIEEEFloatBytesMSB:msb
+    ^ self asFloat digitBytesMSB:msb
+
+    "
+        2  as64BitIEEEFloatBytesMSB:true
+        2.0  as64BitIEEEFloatBytesMSB:true
+    "
+!
+
 asDouble
     "ST80 compatibility: return a double with receivers value.
      our floats are the identical to ST80 doubles"
@@ -1408,11 +1426,11 @@
 !ArithmeticValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.96 2014-12-08 15:08:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.97 2014-12-16 12:21:57 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.96 2014-12-08 15:08:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.97 2014-12-16 12:21:57 stefan Exp $'
 ! !