Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-21 06:39:16 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Use new make_input_port macro

Browse source
This commit is contained in:
Justin Ethier 2017-08-19 18:12:06 -04:00
parent 8b3bf050e8
commit 05fb1cdb7b
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
srfi/106.sld
View file

@ -263,7 +263,7 @@
(define-c %socket-input-port (define-c %socket-input-port
"(void *data, int argc, closure _, object k, object sockfd)" "(void *data, int argc, closure _, object k, object sockfd)"
" FILE *fp = fdopen(obj_obj2int(sockfd), \"r\"); " FILE *fp = fdopen(obj_obj2int(sockfd), \"r\");
make_port(port, fp, 1); make_input_port(port, fp, 1);
return_closcall1(data, k, &port);") return_closcall1(data, k, &port);")
(define (socket-output-port sock) (define (socket-output-port sock)