Changeset 11716 in project


Ignore:
Timestamp:
08/23/08 14:25:05 (13 years ago)
Author:
sjamaan
Message:

Add unix-sockets port to chicken 4

Location:
release/4/unix-sockets
Files:
2 edited
1 copied

Legend:

Unmodified
Added
Removed
  • release/4/unix-sockets/unix-sockets.scm

    r5014 r11716  
    3333; Germany
    3434
    35 
    36 (declare
    37   (uses srfi-18)
    38   (export unix-connect
    39           unix-accept
    40           unix-accept-ready?
    41           unix-listener-fileno unix-listener-path
    42           unix-close
    43           unix-listener?
    44           unix-listen) )
    45 
     35(require-library easyffi)
     36
     37(module unix-sockets
     38  (unix-connect
     39   unix-accept
     40   unix-accept-ready?
     41   unix-listener-fileno unix-listener-path
     42   unix-close
     43   unix-listener?
     44   unix-listen)
     45
     46(import scheme chicken easyffi ports)
    4647
    4748#>
     
    309310    (when (fx= -1 (close s))
    310311      (unix-error 'unix-close "can not close unix socket" l) ) ) )
     312)
  • release/4/unix-sockets/unix-sockets.setup

    r5014 r11716  
    1 
    2 (define easyffi? (string>=? (chicken-version) "2.424"))
    3 
    4 (compile -s -O2 -d1 ,@(if easyffi? '(-extend easyffi) '()) unix-sockets.scm)
    5 (install-extension 'unix-sockets '("unix-sockets.so" "unix-sockets.html")
     1(compile -s -O2 -d1 -extend easyffi unix-sockets.scm -j unix-sockets)
     2(compile -s -O2 -d1 -extend easyffi unix-sockets.import.scm)
     3(install-extension 'unix-sockets '("unix-sockets.so" "unix-sockets.import.so")
    64                   '((version 1.3) (documentation "unix-sockets.html")))
Note: See TracChangeset for help on using the changeset viewer.