[Openmcl-devel] CCL 1.2 and portable allegroserve - can't restart server

John McAleely john at mcaleely.com
Wed Sep 17 09:48:39 UTC 2008


I can replicate the same symptom on my CCL setup (Clozure Common Lisp  
Version 1.2-r9226-RC1  (DarwinX8664)).

I had to make a few changes to acl-compat to get it to work on a  
recent build of ccl. Perhaps this is another area that needs to be  
examined? Is it known if this function has ever worked on ccl in the  
same way as allegro?

J


On 17 Sep 2008, at 10:23, JTK wrote:

>
> Hello again,
>
> I've found that the problem of un-restartable portable allegroserve
> can be 'solved' by removing a  line in aserve/main.cl  in which
> a list of worker threads is killed:
>
>    (dolist (th (wserver-worker-threads server))
>     #+nil(acl-compat.mp:process-kill th) ;; get rid of this
>     (acl-compat.mp:process-allow-schedule))
>
> One finds that (acl-compat.mp:process-kill th) is just a an alias for
> (ccl:process-kill th)
>
> Evidently, killing threads breaks something.
>
> Is it safe just to remove references to the worker processes  and
> let the garbage collector clean them up?  That is,
> (setf (wserver-worker-threads server) nil).
>
> The problem is that the gc doesn't seem to reduce the processes left
> behind by starting/stopping the server now, and the length of
> (ccl:all-processes) just grows with the number of restarts even after
> doing (gc)  between restarts.
>
> Sorry about these aserve questions, but it seems like the aserve
> list is dead, and this involves some subtle internals of CCL.
>
> jan
>
>
>
>
> On Sep 16, 2008, at 9:57 PM, JTK wrote:
>
>> Hello,
>>
>> I'm running CCL 1.2-r10552 PPC 32 and the latest CVS portableaserve
>> (pretty old).
>> This is on a G5 Mac with OS X 10.4.11
>>
>> I find that I can't restart the server. The first start works fine,
>> but the subsequent ones freeze.
>>
>> eg:
>>
>> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>> (net.aserve:start :port 8000)
>> ;; server works OK
>>
>> (net.aserve:shutdown)
>> ;; server stopped OK - no connections accepted
>>
>> (net.aserve:start :port 8000)
>> ;; server now accepting connections, but the connection freezes
>> ;; no log output appears.  A restarted server never works.
>> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>>
>> I'm a bit stuck. Is anyone else using portable aserve?  Has anyone  
>> had
>> success?  Or is
>> there an updated version of aserve somewhere?  The aserve mail list
>> is all spam, alas.
>>
>> Many thanks,
>> Jan
>
> _______________________________________________
> Openmcl-devel mailing list
> Openmcl-devel at clozure.com
> http://clozure.com/mailman/listinfo/openmcl-devel
>




More information about the Openmcl-devel mailing list