help-smalltalk
[Top][All Lists]
Advanced

[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
 !
 

reply via email to

[Prev in Thread] Current Thread [Next in Thread]