scsh-conservatory
/
scsh-0.6
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add record discloser for FDPORT-DATA.

This commit is contained in:
sperber 2002-02-26 14:40:59 +00:00
parent 12ced00589
commit a7517a3f05
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
scsh/newports.scm
View File

@ -6,6 +6,11 @@
channel channel
revealed) revealed)
(define-record-discloser type/fdport-data
(lambda (r)
(list 'fdport-data
(fdport-data:channel r) (fdport-data:revealed r))))
; This stuff is _weak_. ; This stuff is _weak_.
; Vector of weak pointers mapping fd -> fdport. ; Vector of weak pointers mapping fd -> fdport.