Fix STONWriter>>#writeFloat: to respect referenced object protocol wh…

…en writing the special cases (thx to TheGrump for uncovering this issue)
svenvc · Feb 7, 2023 · 89c7e59 · 89c7e59
1 parent 96de626
commit 89c7e59
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/repository/STON-Core.package/STONWriter.class/instance/writeFloat..st b/repository/STON-Core.package/STONWriter.class/instance/writeFloat..st
@@ -9,4 +9,4 @@ writeFloat: float
 					float negative 
 						ifTrue: [ #negativeInfinity ]
 						ifFalse: [ #infinity ] ].
-			writeStream nextPutAll: 'Float['; print: argument; nextPut: $] ]
+			self writeObject: float named: #Float listSingleton: argument ]