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

log ip address of clients in net servers

Browse source
This commit is contained in:
Alex Shinn 2018-01-11 22:05:44 +09:00
parent 08a6962c98
commit 1f805fd3ae
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -38,7 +38,8 @@
(else #f)) (else #f))
default-max-requests))) default-max-requests)))
(define (run sock addr count) (define (run sock addr count)
(log-debug "net-server: accepting request:" count) (log-debug "net-server: accepting request: " count " "
(sockaddr-name (address-info-address addr)))
(let ((ports (let ((ports
(protect (exn (protect (exn
(else (else