Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-20 14:19:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

changed port number from literal to listener-or-addr argument in server.scm

Browse source
This commit is contained in:
arc 2012-10-27 23:29:07 +13:00
parent 4f554499f8
commit f646e0d470
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lib/chibi/net/server.scm
View file

@ -8,7 +8,8 @@
((fileno? listener-or-addr) ((fileno? listener-or-addr)
listener-or-addr) listener-or-addr)
((integer? listener-or-addr) ((integer? listener-or-addr)
(make-listener-socket (get-address-info "localhost" 5556))) (make-listener-socket
(get-address-info "localhost" listener-or-addr)))
(else (else
(make-listener-socket listener-or-addr)))) (make-listener-socket listener-or-addr))))
(max-requests (if (pair? o) (car o) default-max-requests)) (max-requests (if (pair? o) (car o) default-max-requests))