tim Rowledge uploaded a new version of Network to project The Trunk:
http://source.squeak.org/trunk/Network-tpr.202.mcz==================== Summary ====================
Name: Network-tpr.202
Author: tpr
Time: 2 August 2017, 5:56:32.822543 pm
UUID: e26da09c-d555-47c0-8c95-d0fcc1085a03
Ancestors: Network-eem.201
Correct a misleading comment
=============== Diff against Network-eem.201 ===============
Item was changed:
----- Method: NetNameResolver class>>initializeNetwork (in category 'network initialization') -----
initializeNetwork
+ "Initialize the network drivers and record the semaphore to be used by the resolver. Do nothing if the network is already initialized. Signal NoNetworkError if network initialization fails."
- "Initialize the network drivers and record the semaphore to be used by the resolver. Do nothing if the network is already initialized. Evaluate the given block if network initialization fails."
"NetNameResolver initializeNetwork"
self resolverStatus = ResolverUninitialized
ifFalse: [^HaveNetwork := true]. "network is already initialized"
HaveNetwork := false. "in case abort"
Smalltalk newExternalSemaphoreDo: [ :semaphore :index |
ResolverSemaphore := semaphore.
"result is nil if network initialization failed, self if it succeeds"
(self primInitializeNetwork: index)
ifNil: [
Smalltalk unregisterExternalObject: ResolverSemaphore.
ResolverSemaphore := nil.
NoNetworkError signal: 'failed network initialization']
ifNotNil: [ HaveNetwork := true ] ].
self initializeOldNetworkFlag!