Skip to content

Commit a04be13

Browse files
dalehenrichdalehenrich
committed
Merge pull request #14 from GsDevKit/dev
1.0.1 release
2 parents c3e5292 + 6ec9233 commit a04be13

File tree

106 files changed

+374
-293
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

106 files changed

+374
-293
lines changed

‎docs/gettingStarted.md

Lines changed: 105 additions & 80 deletions

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteAbstractExample.class/instance/port.st

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
server compat
2+
port
3+
^ self defaultPortOrResourceNameList first

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteAbstractExample.class/instance/start.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,3 @@
11
server compat
22
start
3-
self interactiveStartServiceOn: nil transactionMode: #'manualBegin'
3+
self interactiveStartServiceOn: 'instance' transactionMode: #'manualBegin'

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteAbstractExample.class/methodProperties.json

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -7,8 +7,9 @@
77
"initErrorLog" : "dkh 01/02/2015 15:39",
88
"initialize" : "dkh 01/02/2015 17:18",
99
"logStack:titled:inTransactionDo:" : "dkh 01/02/2015 15:42",
10+
"port" : "dkh 01/06/2015 16:05",
1011
"queue" : "dkh 12/22/2014 19:48",
1112
"queueCounterValue" : "dkh 12/22/2014 19:48",
1213
"restart" : "dkh 12/24/2014 16:25",
13-
"start" : "dkh 12/27/2014 08:56",
14+
"start" : "dkh 01/06/2015 15:51",
1415
"stop" : "dkh 01/02/2015 17:16" } }

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExample.class/instance/gemServerHandleAlmostOutOfMemoryException..st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -23,4 +23,4 @@ gemServerHandleAlmostOutOfMemoryException: exception
2323
self
2424
logStack: exception
2525
titled:
26-
self name , ' ' , exception class name asString , ' exception encountered: ' "out of transaction or commit did not free up enough memory, unwind stack"
26+
self name , ' ' , exception class name asString , ' exception encountered:' "out of transaction or commit did not free up enough memory, unwind stack"

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExample.class/instance/startBasicServerOn..st

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,9 +1,9 @@
11
service instance-server
2-
startBasicServerOn: ignored
2+
startBasicServerOn: portOrResourceName
33
"start server in current vm. expected to return."
44

55
self
66
doTransaction: [
77
"prime the pump"
88
currentQueueCounter := 0 ].
9-
super startBasicServerOn: ignored
9+
super startBasicServerOn: portOrResourceName

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExample.class/methodProperties.json

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -8,12 +8,12 @@
88
"currentQueueCounter" : "dkh 12/22/2014 19:49",
99
"doTraceTransaction:" : "dkh 12/26/2014 17:56",
1010
"exeConfPath" : "dkh 01/01/2015 18:11",
11-
"gemServerHandleAlmostOutOfMemoryException:" : "dkh 01/01/2015 18:03",
11+
"gemServerHandleAlmostOutOfMemoryException:" : "dkh 01/06/2015 16:50",
1212
"gemServerHandleRemoteInternalServerTriggerException:" : "dkh 12/24/2014 13:02",
1313
"initialize" : "dkh 12/24/2014 16:39",
1414
"processTasksOnQueue" : "dkh 12/30/2014 07:26",
1515
"serviceLoop" : "dkh 12/30/2014 07:27",
16-
"startBasicServerOn:" : "dkh 01/02/2015 17:46",
16+
"startBasicServerOn:" : "dkh 01/06/2015 16:06",
1717
"status" : "dkh 12/24/2014 17:35",
1818
"stop" : "dkh 12/24/2014 17:01",
1919
"taskServiceThreadBlock:" : "dkh 12/26/2014 16:29",

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/tearDown.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
running
22
tearDown
33
| gemServer |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
super tearDown.
66
(ObjectLogEntry trace: 'tearDown: stopGems') addToLog.
77
gemServer

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/test100Tasks.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
test100Tasks
33
| gemServer taskList client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testBreakpoint.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testBreakpoint
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testError.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testError
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testExampleHttp.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testExampleHttp
33
| gemServer taskList client completed |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testHalt.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testHalt
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testOutOfMemoryPersistent.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testOutOfMemoryPersistent
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testOutOfMemoryTemp.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testOutOfMemoryTemp
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testSimple.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testSimple
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testStackOverflow.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testStackOverflow
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testStatus.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testStatus
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testTimeInLondon.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testTimeInLondon
33
| gemServer taskList client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testWarning.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testWarning
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/methodProperties.json

Lines changed: 13 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -11,17 +11,17 @@
1111
"startGems:" : "dkh 12/23/2014 13:04",
1212
"stopGems:" : "dkh 12/23/2014 15:53",
1313
"taskList100" : "dkh 01/02/2015 09:20",
14-
"tearDown" : "dkh 12/23/2014 18:41",
15-
"test100Tasks" : "dkh 01/02/2015 10:38",
16-
"testBreakpoint" : "dkh 01/01/2015 11:15",
17-
"testError" : "dkh 01/01/2015 11:15",
18-
"testExampleHttp" : "dkh 01/01/2015 11:17",
19-
"testHalt" : "dkh 01/01/2015 11:15",
20-
"testOutOfMemoryPersistent" : "dkh 01/01/2015 11:16",
21-
"testOutOfMemoryTemp" : "dkh 01/01/2015 11:16",
22-
"testSimple" : "dkh 01/01/2015 11:16",
23-
"testStackOverflow" : "dkh 01/01/2015 11:16",
24-
"testStatus" : "dkh 01/01/2015 11:16",
25-
"testTimeInLondon" : "dkh 01/01/2015 11:18",
26-
"testWarning" : "dkh 01/01/2015 11:16",
14+
"tearDown" : "dkh 01/06/2015 13:41",
15+
"test100Tasks" : "dkh 01/06/2015 13:41",
16+
"testBreakpoint" : "dkh 01/06/2015 13:41",
17+
"testError" : "dkh 01/06/2015 13:41",
18+
"testExampleHttp" : "dkh 01/06/2015 13:41",
19+
"testHalt" : "dkh 01/06/2015 13:41",
20+
"testOutOfMemoryPersistent" : "dkh 01/06/2015 13:42",
21+
"testOutOfMemoryTemp" : "dkh 01/06/2015 13:42",
22+
"testSimple" : "dkh 01/06/2015 13:42",
23+
"testStackOverflow" : "dkh 01/06/2015 13:42",
24+
"testStatus" : "dkh 01/06/2015 13:42",
25+
"testTimeInLondon" : "dkh 01/06/2015 13:42",
26+
"testWarning" : "dkh 01/06/2015 13:42",
2727
"waitForTasks:gemServer:client:" : "dkh 01/01/2015 11:19" } }

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerParallelProcessingExampleTests.class/instance/testInternalServerError.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testInternalServerError
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer
66
enableCreateContinuations: true;
77
tracing: true.

‎repository/GsApplicationTools-ExampleV31.package/GemServerRemoteServerParallelProcessingExampleTests.class/methodProperties.json

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -6,4 +6,4 @@
66
"gemServerClass" : "dkh 12/30/2014 12:46",
77
"scheduledTaskList" : "dkh 12/30/2014 12:46",
88
"taskList100" : "dkh 01/02/2015 09:18",
9-
"testInternalServerError" : "dkh 01/01/2015 11:17" } }
9+
"testInternalServerError" : "dkh 01/06/2015 13:42" } }

‎repository/GsApplicationTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/instance/tearDown.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
running
22
tearDown
33
| gemServer |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
super tearDown.
66
gemServer
77
doCommitTransaction;

‎repository/GsApplicationTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleError.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testSeasideStyleError
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer enableCreateContinuations: true.
66
gemServer scriptLogEvent: '---->testSeasideStyleError' object: gemServer.
77
gemServer

‎repository/GsApplicationTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleHalt.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testSeasideStyleHalt
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer enableCreateContinuations: true.
66
gemServer scriptLogEvent: '---->testSeasideStyleHalt' object: gemServer.
77
gemServer

‎repository/GsApplicationTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleOutOfMemoryPersistent.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testSeasideStyleOutOfMemoryPersistent
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer enableCreateContinuations: true.
66
gemServer
77
scriptLogEvent: '---->testSeasideStyleOutOfMemoryPersistent'

‎repository/GsApplicationTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleOutOfMemoryTemp.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testSeasideStyleOutOfMemoryTemp
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer enableCreateContinuations: true.
66
gemServer
77
scriptLogEvent: '---->testSeasideStyleOutOfMemoryTemp'

‎repository/GsApplicationTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleSimple.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testSeasideStyleSimple
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer enableCreateContinuations: true.
66
gemServer scriptLogEvent: '---->testSeasideStyleSimple' object: gemServer.
77
gemServer

‎repository/GsApplicationTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleStackOverflow.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testSeasideStyleStackOverflow
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer enableCreateContinuations: true.
66
gemServer
77
scriptLogEvent: '---->testSeasideStyleStackOverflow'

‎repository/GsApplicationTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleWarning.st

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
tests
22
testSeasideStyleWarning
33
| gemServer client |
4-
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
4+
gemServer := GemServer gemServerNamed: self gemServerName.
55
gemServer enableCreateContinuations: true.
66
gemServer scriptLogEvent: '---->testSeasideStyleWarning' object: gemServer.
77
gemServer

‎repository/GsApplicationTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/methodProperties.json

Lines changed: 8 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -7,12 +7,12 @@
77
"setUp" : "dkh 01/02/2015 14:45",
88
"startGems:" : "dkh 01/02/2015 11:11",
99
"stopGems:" : "dkh 01/02/2015 11:11",
10-
"tearDown" : "dkh 01/02/2015 14:50",
11-
"testSeasideStyleError" : "dkh 01/02/2015 16:05",
12-
"testSeasideStyleHalt" : "dkh 01/02/2015 16:04",
13-
"testSeasideStyleOutOfMemoryPersistent" : "dkh 01/02/2015 16:34",
14-
"testSeasideStyleOutOfMemoryTemp" : "dkh 01/02/2015 16:38",
15-
"testSeasideStyleSimple" : "dkh 01/02/2015 12:33",
16-
"testSeasideStyleStackOverflow" : "dkh 01/02/2015 16:30",
17-
"testSeasideStyleWarning" : "dkh 01/02/2015 16:06",
10+
"tearDown" : "dkh 01/06/2015 13:42",
11+
"testSeasideStyleError" : "dkh 01/06/2015 13:42",
12+
"testSeasideStyleHalt" : "dkh 01/06/2015 13:42",
13+
"testSeasideStyleOutOfMemoryPersistent" : "dkh 01/06/2015 13:42",
14+
"testSeasideStyleOutOfMemoryTemp" : "dkh 01/06/2015 13:42",
15+
"testSeasideStyleSimple" : "dkh 01/06/2015 13:43",
16+
"testSeasideStyleStackOverflow" : "dkh 01/06/2015 13:43",
17+
"testSeasideStyleWarning" : "dkh 01/06/2015 13:43",
1818
"waitAndValidateResponse:" : "dkh 01/02/2015 12:05" } }

‎repository/GsApplicationTools-ExampleV31.package/monticello.meta/version

Lines changed: 1 addition & 1 deletion
Large diffs are not rendered by default.

‎repository/GsApplicationTools-Server.package/GemServer.class/class/addGemServer..st

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
registry accessing
2+
addGemServer: aServer
3+
^ GemServerRegistry addGemServer: aServer

‎repository/GsApplicationTools-Server.package/GemServer.class/class/createServerOfClass.withName.on..st

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
instance creation
2-
createServerOfClass: aServerClass withName: aName on: anArrayOfPortNumbers
3-
^self new
4-
serverClass: aServerClass;
5-
name: aName;
6-
ports: anArrayOfPortNumbers;
7-
yourself.
2+
createServerOfClass: aServerClass withName: aName on: anArrayOfPortNumbersOrResourceNames
3+
^ self new
4+
serverClass: aServerClass;
5+
name: aName;
6+
portOrResourceNameList: anArrayOfPortNumbersOrResourceNames;
7+
yourself

‎repository/GsApplicationTools-Server.package/GemServer.class/class/defaultPortList.st

Lines changed: 0 additions & 3 deletions
This file was deleted.

‎repository/GsApplicationTools-Server.package/GemServer.class/class/defaultPortOrResourceNameList.st

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
accessing
2+
defaultPortOrResourceNameList
3+
^ #(8383)

‎repository/GsApplicationTools-Server.package/GemServer.class/class/gemServerNamed..st

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
registry accessing
2+
gemServerNamed: aString
3+
^ GemServerRegistry gemServerNamed: aString

‎repository/GsApplicationTools-Server.package/GemServer.class/class/gemServerNames.st

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
registry accessing
2+
gemServerNames
3+
^ GemServerRegistry gemServerNames

‎repository/GsApplicationTools-Server.package/GemServer.class/class/register..st

Lines changed: 5 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,6 @@
1-
registration
1+
gem server registration
22
register: aName
3-
^ self register: aName for: self serverClass on: self defaultPortList
3+
^ self
4+
register: aName
5+
for: self serverClass
6+
on: self defaultPortOrResourceNameList

‎repository/GsApplicationTools-Server.package/GemServer.class/class/register.for.on..st

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
1-
registration
2-
register: aName for: aServerClass on: anArrayOfPortNumbers
1+
gem server registration
2+
register: aName for: aServerClass on: anArrayOfPortNumbersOrResourceNames
33
^ (self
44
createServerOfClass: aServerClass
55
withName: aName
6-
on: anArrayOfPortNumbers)
6+
on: anArrayOfPortNumbersOrResourceNames)
77
register;
88
yourself

‎repository/GsApplicationTools-Server.package/GemServer.class/class/register.on..st

Lines changed: 6 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,6 @@
1-
registration
2-
register: aName on: anArrayOfPortNumbers
3-
^ self register: aName for: self serverClass on: anArrayOfPortNumbers
1+
gem server registration
2+
register: aName on: anArrayOfPortNumbersOrResourceIds
3+
^ self
4+
register: aName
5+
for: self serverClass
6+
on: anArrayOfPortNumbersOrResourceIds

‎repository/GsApplicationTools-Server.package/GemServer.class/class/removeGemServer..st

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
registry accessing
2+
removeGemServer: aServer
3+
^ GemServerRegistry removeGemServer: aServer

0 commit comments

Comments
 (0)