| 1 |
# |
| 2 |
# This should not be needed. The amd64 port of ezm3 has |
| 3 |
# compiler bugs that manifest as sorting problems. Once that |
| 4 |
# is fixed, this can go away. |
| 5 |
# |
| 6 |
--- suplib/src/ChannelMux.m3 Sun Oct 26 11:09:31 2003 |
| 7 |
+++ suplib/src/ChannelMux.m3 Tue Mar 4 11:26:19 2003 |
| 8 |
@@ -778,5 +778,5 @@ |
| 9 |
PROCEDURE ChanPut(self: Channel; |
| 10 |
READONLY arr: ARRAY OF CHAR) |
| 11 |
+ RAISES {Wr.Failure, Thread.Alerted} = |
| 12 |
- RAISES {Thread.Alerted, Wr.Failure} = |
| 13 |
VAR |
| 14 |
pos := 0; |
| 15 |
--- suplib/src/EscapedWr.m3 Sun Oct 26 11:10:20 2003 |
| 16 |
+++ suplib/src/EscapedWr.m3 Tue Mar 4 11:26:20 2003 |
| 17 |
@@ -46,5 +46,5 @@ |
| 18 |
|
| 19 |
PROCEDURE Close(self: T) |
| 20 |
+ RAISES {Wr.Failure, Thread.Alerted} = |
| 21 |
- RAISES {Thread.Alerted, Wr.Failure} = |
| 22 |
BEGIN |
| 23 |
TRY |
| 24 |
@@ -63,5 +63,5 @@ |
| 25 |
|
| 26 |
PROCEDURE Flush(self: T) |
| 27 |
+ RAISES {Wr.Failure, Thread.Alerted} = |
| 28 |
- RAISES {Thread.Alerted, Wr.Failure} = |
| 29 |
BEGIN |
| 30 |
Seek(self, self.cur); |
| 31 |
@@ -91,5 +91,5 @@ |
| 32 |
|
| 33 |
PROCEDURE Seek(self: T; n: CARDINAL) |
| 34 |
+ RAISES {Wr.Failure, Thread.Alerted} = |
| 35 |
- RAISES {Thread.Alerted, Wr.Failure} = |
| 36 |
VAR |
| 37 |
ch: CHAR; |
| 38 |
--- suplib/src/GzipWr.m3 Sun Oct 26 11:11:22 2003 |
| 39 |
+++ suplib/src/GzipWr.m3 Tue Mar 4 11:26:23 2003 |
| 40 |
@@ -58,5 +58,5 @@ |
| 41 |
|
| 42 |
PROCEDURE Close(self: T) |
| 43 |
+ RAISES {Wr.Failure, Thread.Alerted} = |
| 44 |
- RAISES {Thread.Alerted, Wr.Failure} = |
| 45 |
VAR |
| 46 |
status: INTEGER; |
| 47 |
@@ -112,5 +112,5 @@ |
| 48 |
|
| 49 |
PROCEDURE Flush(self: T) |
| 50 |
+ RAISES {Wr.Failure, Thread.Alerted} = |
| 51 |
- RAISES {Thread.Alerted, Wr.Failure} = |
| 52 |
VAR |
| 53 |
status: INTEGER; |
| 54 |
@@ -170,5 +170,5 @@ |
| 55 |
|
| 56 |
PROCEDURE Seek(self: T; n: CARDINAL) |
| 57 |
+ RAISES {Wr.Failure, Thread.Alerted} = |
| 58 |
- RAISES {Thread.Alerted, Wr.Failure} = |
| 59 |
VAR |
| 60 |
oldLo: CARDINAL; |
| 61 |
--- suplib/src/MD5Wr.m3 Sun Oct 26 11:10:48 2003 |
| 62 |
+++ suplib/src/MD5Wr.m3 Tue Mar 4 11:26:24 2003 |
| 63 |
@@ -48,5 +48,5 @@ |
| 64 |
|
| 65 |
PROCEDURE Close(self: T) |
| 66 |
+ RAISES {Wr.Failure, Thread.Alerted} = |
| 67 |
- RAISES {Thread.Alerted, Wr.Failure} = |
| 68 |
BEGIN |
| 69 |
IF self.closeChild THEN |
| 70 |
@@ -56,5 +56,5 @@ |
| 71 |
|
| 72 |
PROCEDURE Flush(self: T) |
| 73 |
+ RAISES {Wr.Failure, Thread.Alerted} = |
| 74 |
- RAISES {Thread.Alerted, Wr.Failure} = |
| 75 |
BEGIN |
| 76 |
Seek(self, self.cur); |
| 77 |
@@ -96,5 +96,5 @@ |
| 78 |
|
| 79 |
PROCEDURE Seek(self: T; n: CARDINAL) |
| 80 |
+ RAISES {Wr.Failure, Thread.Alerted} = |
| 81 |
- RAISES {Thread.Alerted, Wr.Failure} = |
| 82 |
BEGIN |
| 83 |
<* ASSERT n = self.cur *> |
| 84 |
--- suptcp/src/POSIX/SupTCP.m3 Sun Oct 26 11:08:21 2003 |
| 85 |
+++ suptcp/src/POSIX/SupTCP.m3 Sun Apr 6 16:48:58 2003 |
| 86 |
@@ -289,5 +289,5 @@ |
| 87 |
PROCEDURE GetBytesFD( |
| 88 |
t: T; VAR arr: ARRAY OF CHAR; timeout: LONGREAL) : CARDINAL |
| 89 |
+ RAISES {Rd.Failure, Thread.Alerted, ConnFD.TimedOut} = |
| 90 |
- RAISES {Rd.Failure, ConnFD.TimedOut, Thread.Alerted} = |
| 91 |
VAR |
| 92 |
len: INTEGER; |
