Mercurial Mercurial > hg > stx-libbasic2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#BUGFIX by exept
authorClaus Gittinger <cg@exept.de>
Sat, 10 Aug 2019 17:32:19 +0200
changeset 5075 18cba5cb7d94
parent 5074 7eaede72d204
child 5076 185b8f374d44
#BUGFIX by exept class: QuadFloat changed: #* (send #error instead of #halt)
QuadFloat.st file | annotate | diff | comparison | revisions 
--- a/QuadFloat.st	Sat Aug 10 17:31:50 2019 +0200
+++ b/QuadFloat.st	Sat Aug 10 17:32:19 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'stx:libbasic2' }"
 
 "{ NameSpace: Smalltalk }"
@@ -2600,7 +2602,7 @@
         ^ aNumber productFromQuadFloat:self
     ].
 
-thisContext isReallyRecursive ifTrue:[self halt].
+    thisContext isReallyRecursive ifTrue:[self error].
     ^ aNumber productFromQuadFloat:self
 !
hg/stx-libbasic2