Changeset 14449 in project


Ignore:
Timestamp:
04/26/09 12:01:18 (11 years ago)
Author:
Alex Shinn
Message:

had renamed procedures like ##ssl#connect to ssl-connect,
which then conflicted with an existing ssl-connect.

Location:
release/4/openssl
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/4/openssl/openssl.scm

    r14315 r14449  
    215215                #f)))))
    216216       (apply ssl-abort loc sym args)))))
    217      
     217
    218218(define (ssl-set-fd! ssl fd)
    219219  (ssl-result-or-abort
     
    223223  (void))
    224224
    225 (define (ssl-connect ssl)
     225(define (ssl-connect-ssl ssl)
    226226  (ssl-result-or-abort
    227    'ssl-connect ssl
     227   'ssl-connect-ssl ssl
    228228   ((foreign-lambda int "SSL_connect" c-pointer) ssl) #t))
    229229
    230 (define (ssl-accept ssl)
     230(define (ssl-accept-ssl ssl)
    231231  (ssl-result-or-abort
    232    'ssl-accept ssl
     232   'ssl-accept-ssl ssl
    233233   ((foreign-lambda int "SSL_accept" c-pointer) ssl) #t))
    234234
     
    432432            (ssl-set-fd! ssl fd)
    433433            (let loop ()
    434               (case (ssl-connect ssl)
     434              (case (ssl-connect-ssl ssl)
    435435                ((want-read)
    436436                 (##sys#thread-block-for-i/o! ##sys#current-thread fd #t)
     
    491491            (ssl-set-fd! ssl fd)
    492492            (let loop ()
    493               (case (ssl-accept ssl)
     493              (case (ssl-accept-ssl ssl)
    494494                ((want-read)
    495495                 (##sys#thread-block-for-i/o! ##sys#current-thread fd #t)
  • release/4/openssl/openssl.setup

    r14315 r14449  
    2020  '("openssl.scm" "openssl.so" "openssl.import.so" "openssl-static.o"
    2121    "openssl.html" "egg.jpg")
    22   '((version "1.2.0")
     22  '((version "1.2.1")
    2323    (static "openssl-static.o")
    2424    (static-options "-lssl -lcrypto -lgdi32")
Note: See TracChangeset for help on using the changeset viewer.