Fix errorSymbolForNumber, add clearLastErrorNumber.
authorStefan Vogel <sv@exept.de>
Fri, 12 Apr 1996 10:36:31 +0200
changeset 1153 8119975c55ce
parent 1152 1de5488d7c80
child 1154 96bb8fce61cf
Fix errorSymbolForNumber, add clearLastErrorNumber.
Unix.st
--- a/Unix.st	Wed Apr 10 22:24:44 1996 +0200
+++ b/Unix.st	Fri Apr 12 10:36:31 1996 +0200
@@ -1406,6 +1406,22 @@
 
 !OperatingSystem class methodsFor:'error messages'!
 
+clearLastErrorNumber
+    "return the last errors number.
+     See also: #lastErrorSymbol and #lastErrorString.
+     Notice: having a single error number is a bad idea in a multithreaded
+             environment - this interface will change."
+
+    LastErrorNumber := nil.
+
+     "
+      OperatingSystem clearLastErrorNumber
+     "
+
+    "Created: 12.4.1996 / 09:28:58 / stefan"
+    "Modified: 12.4.1996 / 09:38:51 / stefan"
+!
+
 currentErrorNumber
     "returns the OS's last error nr (i.e. the value of errno).
      Notice, that the value of this flag is only valid immediately
@@ -2428,11 +2444,13 @@
     "return a symbol for a unix errorNumber
      (as returned by a system call)."
 
-     (self errorSymbolAndTextForNumber:errNr) at:1
+    ^ (self errorSymbolAndTextForNumber:errNr) at:1
 
     "
      OperatingSystem errorTextForNumber:4
     "
+
+    "Modified: 12.4.1996 / 09:16:29 / stefan"
 !
 
 errorTextForNumber:errNr
@@ -7286,6 +7304,6 @@
 !OperatingSystem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.135 1996-04-07 02:13:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.136 1996-04-12 08:36:31 stefan Exp $'
 ! !
 OperatingSystem initialize!