hyung-hwan/moo
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

added a few lines to Http.moo

Browse Source
This commit is contained in:
hyunghwan.chung 2018-05-10 16:16:03 +00:00
parent 16b12e2dfc
commit a94ccf62b3
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
moo/kernel/Http.moo
View File

@ -12,9 +12,12 @@ class HttpSocket(Socket)
class HttpServerSocket(ServerSocket) class HttpServerSocket(ServerSocket)
{ {
var connections.
method initialize method initialize
{ {
super initialize. super initialize.
### self.connections := LinkedList new.
} }
method onSocketAccepted: clisck from: cliaddr method onSocketAccepted: clisck from: cliaddr
@ -22,12 +25,13 @@ class HttpServerSocket(ServerSocket)
'CLIENT accepted ..............' dump. 'CLIENT accepted ..............' dump.
clisck dump. clisck dump.
cliaddr dump. cliaddr dump.
## clisck close. ### self.connections addLast: clisck.
} }
method acceptedSocketClass method acceptedSocketClass
{ {
^HttpSocket ##^if (self currentAddress port == 80) { HttpSocket } else { HttpSocket }.
^HttpSocket.
} }
} }