| 123456789101112131415161718192021222324252627282930313233 | Object subclass: #TrivialServer        instanceVariableNames: 'counter'        category: 'TrivialServer'!!TrivialServer methodsFor: 'initializing'!initialize        counter := 0! !!TrivialServer methodsFor: 'processing'!process: aRequest        | hostname httpVersion stream |	counter := counter + 1.        "Calling a method in a js module"	hostname := {'os.hostname()'}.        "Accessing a property of js HTTP request object"        httpVersion := {'aRequest.httpVersion'}.        stream := String new writeStream.	stream		nextPutAll: '<html><p>Request HTTP version: ', httpVersion, '</p>';		nextPutAll: '<p>OS hostname: ', hostname, '</p>';		nextPutAll: '<p>Number of requests: ', counter asString, '</p></html>'.	^stream contents! !!TrivialServer class methodsFor: 'initialization'!initialize	{'os = require(''os'');'}! !
 |