thanks http://code.google.com/p/pharo/issues/detail?id=5127 On Dec 22, 2011, at 1:01 PM, Sven Van Caekenberghe wrote:
Name: Zinc-HTTP-SvenVanCaekenberghe.233 Author: SvenVanCaekenberghe Time: 22 December 2011, 12:54:05 pm UUID: 8dd541c9-2890-4a8f-b5cb-d6ac2e9341af Ancestors: Zinc-HTTP-SvenVanCaekenberghe.232
Rewrote ZnServer and subclasses's class methods #startDefaultOn: and #defaultOn: to treat the default instance like a singleton by reusing/restarting/reconfiguring existing instances; expanded comments; Changed the implementation of ZnServer>>#start to automagically register the default instance; Changed the implementation of ZnServer>>#stop to always unregister; added ZnServer>>#stop: with an option to control the unregistering so that it does not happen when shutting down the image
----
Name: Zinc-Tests-SvenVanCaekenberghe.121 Author: SvenVanCaekenberghe Time: 22 December 2011, 12:56:23 pm UUID: c1396284-0787-4c42-bedd-fb6ae918c68d Ancestors: Zinc-Tests-SvenVanCaekenberghe.120
added ZnServerTests>>#testDefault to test the new semantics of ZnServer class>>#startDefaultOn:
---
ZnServerTests>>#testDefault | server | ZnServer stopDefault. self assert: ZnServer default isNil. server := ZnServer startDefaultOn: 1701. self assert: ZnServer default notNil. self assert: ZnServer default == server. self assert: ZnServer default port = 1701. self assert: ZnServer default isRunning. self assert: (ZnServer managedServers includes: server). ZnServer stopDefault. self assert: ZnServer default isNil. self deny: server isRunning. self deny: (ZnServer managedServers includes: server). server := ZnServer startDefaultOn: 1701. "Starting the default again is actually a restart" ZnServer startDefaultOn: 1701. self assert: ZnServer default == server. ZnServer stopDefault