Re: [Chicken-users] git rm write-line?

[Sascha Ziemann]

2011/9/21 Christian Kellermann <address@hidden>:
> On a second thought, here is what write-line does:
>
> (define write-line
>  (lambda (str . port)
>    (let ((p (if (##core#inline "C_eqp" port '())
>                 ##sys#standard-output
>                 (##sys#slot port 0) ) ) )
>      (##sys#check-port p 'write-line)
>      (##sys#check-string str 'write-line)
>      (display str p)
>      (newline p) ) ) )
>

Ah I see. write-line is only a quick hack. I thought it would do
something fast like fwrite.