[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#24075: tls/https support in Guile (through r6rs binary ports?)
|
From: |
Christopher Allan Webber |
|
Subject: |
bug#24075: tls/https support in Guile (through r6rs binary ports?) |
|
Date: |
Sun, 06 Nov 2016 22:40:40 -0600 |
|
User-agent: |
mu4e 0.9.16; emacs 25.1.1 |
Ludovic Courtès writes:
> Christopher Allan Webber <address@hidden> skribis:
>
>> First of all, the response body starts in the wrong place... it should
>> start with "<!DOCTYPE html>". Then, somewhere in the middle it switches
>> to garbage output. I'm not sure why.
>
> [...]
>
>> + (let ((record ((gnutls-ref 'session-record-port) session)))
>> + (define (read! bv start count)
>> + (define read-bv (get-bytevector-n record count))
>> + (if (eof-object? read-bv)
>> + 0 ; read! returns 0 on eof-object
>> + (let ((read-bv-len (bytevector-length read-bv)))
>> + (bytevector-copy! read-bv 0 bv 0 read-bv-len)
>> + read-bv-len)))
>
> Looks like ‘start’ is ignored here. Could that be the reason?
>
> Ludo’.
... that was absolutely it. What an omission on my part! Thanks for
catching it. :)