#BUGFIX by mawalch
authormawalch
Thu, 10 Aug 2017 16:18:21 +0200
changeset 17616 7fae9311f5f3
parent 17615 3e309e07c22a
child 17617 b0e15ebc84f2
#BUGFIX by mawalch class: ExternalStreamMonitor changed: #updateStatus:
ExternalStreamMonitor.st
--- a/ExternalStreamMonitor.st	Wed Aug 09 23:57:34 2017 +0200
+++ b/ExternalStreamMonitor.st	Thu Aug 10 16:18:21 2017 +0200
@@ -348,7 +348,11 @@
                 OperatingSystem isMSWINDOWSlike ifTrue:[
                     aStream isOpen ifTrue:[
                         handle := aStream fileHandle.
-                        handleString := handle address hexPrintString
+                        handle isInteger ifTrue:[
+                            handleString := handle printString
+                        ] ifFalse:[
+                            handleString := (handle address ? 0) hexPrintString
+                        ].
                     ].
                     handleString := (handleString ? '') leftPaddedTo:7
                 ] ifFalse:[