[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Help-smalltalk] How to restart an image running a server?
From: |
Paolo Bonzini |
Subject: |
Re: [Help-smalltalk] How to restart an image running a server? |
Date: |
Wed, 04 Oct 2006 15:01:05 +0200 |
User-agent: |
Thunderbird 1.5.0.7 (Macintosh/20060909) |
The short answer is: I don't have a clue, but I have a feeling that the
attached patch might fix it (just by grepping the sources for senders of
isPeerAlive) -- or a similar patch for your classes.
Looks like you have something to contribute, haven't you?
*cat-from-shrek2-look*
Paolo
--- orig/net/NetServer.st
+++ mod/net/NetServer.st
@@ -100,6 +100,10 @@ startNewProcess
process resume!
+isPeerAlive
+ ^socket notNil and: [ socket isPeerAlive ]
+!
+
socket
^socket
! !
@@ -240,13 +244,13 @@ run
] on: ExAll
do: [ :ex |
"Ignore errors due to bad communication lines."
- self socket isPeerAlive ifFalse: [ ex return ].
+ self isPeerAlive ifFalse: [ ex return ].
ex pass
].
self log: req time: time.
- self socket isPeerAlive
+ self isPeerAlive
] whileTrue
!