December 2010 - Gambit-list - mailman.iro.umontreal.ca

Edge triggered I/O with libevent
by Adam Langley 04 Apr '13

04 Apr '13

Gambit uses the select call on POSIX systems to multiplex IO operations. This is fine for small numbers of file descriptors, but falls apart quickly with large numbers[1]. libevent[2] is a wrapper library around a number of modern IO multiplexing systems (epoll on Linux, kqueue on the BSDs as well as poll and select). Attached is a patch which converts Gambit to using edge triggered I/O with epoll and libevent. This also requires a patch (attached) of libevent since the standard distribution doesn't include edge triggering support and the upstream appears to be on holiday. (epoll is required because I don't have a BSD box on which to develop edge triggering support for kqueue) This patch (for Gambit) preprocesses away to nothing unless --enable-libevent is passed to the configure script. (Note that, since this patches the configure.ac script, you'll need to run autoconf to regenerate). I hope I've not broken anything, but at this stage I've only tested that the console and tcp ports work. This patch (in the future) should also allow people, who write programs which use socket calls directly, to integrate into the main event loop at some point. Testing is more than welcome and, if you find a form of IO which is broken, please email me. [1] http://monkey.org/~provos/libevent/libevent-benchmark2.jpg [2] http://monkey.org/~provos/libevent/ -- Adam Langley agl(a)imperialviolet.org http://www.imperialviolet.org (+44) (0)7906 332512 PGP: 9113 256A CC0F 71A6 4C84 5087 CDA5 52DF 2CB6 3D60

2 2

How to pass a u8vector to the FFI
by Mikael 20 Sep '11

20 Sep '11

You do this, by declaring the passed u8vector as a scheme-object in the c-lambda definition. The memory pointer to the u8vector's contents in the C code is resolved by void *u8vectorptr = ___CAST(void*,&___FETCH_U8(___BODY(theu8vectorschemeobjectvariable),___INT(0))); Remember that the pointer is only to be kept until the next return to Scheme. Mikael 2010/3/30 Álvaro Castro-Castilla <alvaro.castro.castilla(a)gmail.com> > Hi! > > Is there a way to pass a u8-vector to a FFI interface somehow? > The way I expect this to work is through a (pointer unsigned-char), but it > obviously doesn't work, claiming a proper C pointer. I would like to be able > to build this arrays from Scheme code. Is there a way? > > Currently I have to call a FFI function to set char by char, calling the > c-lambda function too many times. > > One thing that could work is something that converts u8-vectors to unsigned > char* arrays, does that exist in Gambit? > > > Thanks, > > Álvaro > > _______________________________________________ > Gambit-list mailing list > Gambit-list(a)iro.umontreal.ca > https://webmail.iro.umontreal.ca/mailman/listinfo/gambit-list > >

6 10

cmake for projects written in gambit?
by Matthew Koichi Grimes 06 Apr '11

06 Apr '11

Has anybody used CMake as a build system for their Gambit projects? I'm not talking about building Gambit itself, but rather building projects that are written in Gambit. If so, could I see your CMakeList bulid files? I would also be interested in other build systems' makefiles (make, ant, etc), if people are wiling to share, or point me to an open-source project written in Gambit that I could download. Best, -- Matt

2 4

OS X 10.6 "Building Loadable Library" example
by David Dreisigmeyer 31 Dec '10

31 Dec '10

Hi, I've been trying the "Building Loadable Library" m1/m2/m3 example (pg 16 of pdf manual). I'm getting the following error: $ gcc -bundle m1.o m2.o m3.o foo.o1.o -o foo.o1 -L/opt/local/lib/gambit-c -lgambc -I/opt/local/include ld: duplicate symbol ____G_cons in /opt/local/lib/gambit-c/libgambc.a(_gambc.o) and foo.o1.o collect2: ld returned 1 exit status Also, after this works, can I do something like the following: $gsi > (load "foo.o1") > (map twice '(5)) Thanks, -Dave

2 2

Starting swank server
by David Dreisigmeyer 30 Dec '10

30 Dec '10

Hi, I have the following for my .eclrc: (require 'asdf) (pushnew #P"/Users/daviddreisigmeyer/.emacs.d/site-lisp/slime/" asdf:*central-registry* :test #'equal) (push "/Users/daviddreisigmeyer/.emacs.d/site-lisp/slime/" asdf:*central-registry*) (asdf:oos 'asdf:load-op 'swank) (setf swank:*use-dedicated-output-stream* nil) (setf swank:*communication-style* :fd-handler) (swank:create-server :port 4010 :dont-close t) I'm getting the error below. Am I doing something wrong? I have ecl from MacPorts. Thanks, -Dave $ ecl ;;; Loading #P"/opt/local/lib/ecl-10.4.1/ASDF.fas" ;;; Loading #P"/opt/local/lib/ecl-10.4.1/CMP.fas" ;;; Loading #P"/opt/local/lib/ecl-10.4.1/sysfun.lsp" ; loading system definition from ; /Users/daviddreisigmeyer/.emacs.d/site-lisp/slime/swank.asd into ; #<ASDF0 package> ;;; Loading "/Users/daviddreisigmeyer/.emacs.d/site-lisp/slime/swank.asd" ; registering #<ASDF:SYSTEM :SWANK 4305993088> as SWANK ;;; Loading "/Users/daviddreisigmeyer/Programming/emacs.d/site-lisp/slime/swank-loader.lisp" ;;; Loading "/Users/daviddreisigmeyer/.slime/fasl/2010-07-22/ecl-10.4.1-darwin-i686/swank-backend.fas" ;;; Loading "/Users/daviddreisigmeyer/.slime/fasl/2010-07-22/ecl-10.4.1-darwin-i686/swank-source-path-parser.fas" ;;; Loading "/Users/daviddreisigmeyer/.slime/fasl/2010-07-22/ecl-10.4.1-darwin-i686/swank-source-file-cache.fas" ;;; Loading "/Users/daviddreisigmeyer/.slime/fasl/2010-07-22/ecl-10.4.1-darwin-i686/swank-ecl.fas" ; loading system definition from /opt/local/lib/ecl-10.4.1/sockets.asd into ; #<ASDF0 package> ;;; Loading "/opt/local/lib/ecl-10.4.1/sockets.asd" ; registering #<PREBUILT-SYSTEM "sockets" 4321265920> as sockets ;;; Loading "/opt/local/lib/ecl-10.4.1/sockets.fas" ; loading system definition from /opt/local/lib/ecl-10.4.1/profile.asd into ; #<ASDF0 package> ;;; Loading "/opt/local/lib/ecl-10.4.1/profile.asd" ; registering #<PREBUILT-SYSTEM "profile" 4321690992> as profile ;;; Loading "/opt/local/lib/ecl-10.4.1/profile.fas" ; loading system definition from /opt/local/lib/ecl-10.4.1/serve-event.asd into ; #<ASDF0 package> ;;; Loading "/opt/local/lib/ecl-10.4.1/serve-event.asd" ; registering #<PREBUILT-SYSTEM "serve-event" 4322002240> as serve-event ;;; Loading "/opt/local/lib/ecl-10.4.1/serve-event.fas" ;;; Loading "/Users/daviddreisigmeyer/.slime/fasl/2010-07-22/ecl-10.4.1-darwin-i686/swank-gray.fas" ;;; Loading "/Users/daviddreisigmeyer/.slime/fasl/2010-07-22/ecl-10.4.1-darwin-i686/swank-match.fas" ;;; Loading "/Users/daviddreisigmeyer/.slime/fasl/2010-07-22/ecl-10.4.1-darwin-i686/swank-rpc.fas" ;;; Loading "/Users/daviddreisigmeyer/.slime/fasl/2010-07-22/ecl-10.4.1-darwin-i686/swank.fas" ;;; Warning: These Swank interfaces are unimplemented: (ACTIVATE-STEPPING ADD-FD-HANDLER ADD-SIGIO-HANDLER DUP EXEC-IMAGE FRAME-CALL INTERRUPT-THREAD LIST-CALLEES LIST-CALLERS MACROEXPAND-ALL MAKE-FD-STREAM RECEIVE-IF REMOVE-FD-HANDLERS REMOVE-SIGIO-HANDLERS RESTART-FRAME RETURN-FROM-FRAME SAVE-IMAGE SEND SLDB-BREAK-AT-START SLDB-BREAK-ON-RETURN SLDB-STEP-INTO SLDB-STEP-NEXT SLDB-STEP-OUT SPAWN TOGGLE-TRACE) ;; Swank started at port: 4010. An error occurred during initialization: SWANK-BACKEND:ADD-FD-HANDLER not implemented.

2 2

Building Gambit for recent iOS
by mikel evins 29 Dec '10

29 Dec '10

I haven't had any success building Gambit for recent versions of Apple's iOS SDK. I've tried monkeying with the makefiles by hand, and tweaking the configure scripts that James Long and a couple of other people have created, but no joy, so far. I've succeeded in this sort of effort before on my own, and presumably can again, but I thought before pouring many hours down the drain I'd ask whether anyone else has already done it and is willing to share their configuration, or the steps they followed to get it. I'm using the iOS 4.2 SDK, and attempting to build Gambit 4.6.0. --me

7 29

Possible do several REP:s in a sequence in the current thread in the REPL, if several threads are in the repl at the same time?
by Mikael 29 Dec '10

29 Dec '10

Gambit's default behavior is to switch thread after each REP in the repl. Is there a way to override this? Thanks (As an example, below I evaluate 1 2 3 4 in a sequence with two threads in the repl. Possibly something in the style of ,repl-stop-switching-between-threads 1 2 3 4 ,reset-repl-to-default-switching-mode could do it. > 1 1 ------------- REPL is now in #<thread #2> ------------- > 2 2 ------------- REPL is now in #<thread #1 primordial> ------------- > 3 3 ------------- REPL is now in #<thread #2> ------------- > 4 4 ------------- REPL is now in #<thread #1 primordial> ------------- > )

1 1

Re: [gambit-list] network ports/sockets question
by sean chapel 28 Dec '10

28 Dec '10

I currently spawn a thread for reading data but on the other thread I send data. So when the reading thread blocks I can't send data on the other thread. -Sean Chapel On Tue, Dec 28, 2010 at 5:26 PM, Frederick LeMaster <fred.lemaster(a)gmail.com> wrote: > You can use gambit's threads to have one thread block on port I/O and > allow another thread to check a condition variable to see if there is > available data. > > 2010/12/28 sean chapel <seoushi(a)gmail.com>: >> P!, >> >> Thanks. I did see that function but it's not quite what I was looking >> for but it should work. I would have to set the timeout to 0 so it >> returns instantly. Something like c's poll function would be a better >> fit. >> >> -Sean Chapel >> >> 2010/12/28 Adrien "Pied" Piérard <axioplase(a)gmail.com>: >>> Hi. >>> >>>> I tried using >>>> "peek-char" but it seems it's blocking. What should I use in this >>>> situation? >>> >>> I'm pretty sure you're looking for INPUT-PORT-TIMEOUT-SET! >>> http://dynamo.iro.umontreal.ca/~gambit/wiki/index.php?title=Documentation:P…! >>> >>> >>> Cheers, >>> >>> P! >>> -- >>> Français, English, 日本語, 한국어 >>> >> _______________________________________________ >> Gambit-list mailing list >> Gambit-list(a)iro.umontreal.ca >> https://webmail.iro.umontreal.ca/mailman/listinfo/gambit-list >> >

2 1

network ports/sockets question
by sean chapel 28 Dec '10

28 Dec '10

I'm looking for a way to see if there is is any information on a port without blocking or incrementing the buffer position. I tried using "peek-char" but it seems it's blocking. What should I use in this situation? Thanks, -Sean Chapel

2 2

List of defines after macro-expansion of structure/type definition.
by Adrien Piérard 15 Dec '10

15 Dec '10

Hi everyone. The more I use DEFINE-STRUCTURE or DEFINE-TYPE, the more I wish that my editor would do some syntax colouring of the constructors/getters/setters of each type I define. I believe that I could write a command to create the highlights for a given S-exp, or that I could write a parser in my editor (vim), but I believe that it may not be the best thing to do. (Well, actually, parsing just the structure declaration may be very the best trade-off between efficiency and pain-to-implement). So, I wonder if there's a way to tell gambit to print/export all the names it defined after doing macro expansion of a file, and then quit without evaluating anything. I would then have a callback in my editor to get new symbols and then add new syntax colouring for them on the fly… I thought I could use "gsc -expansion" for that, but it's full of invalid tokens that can't be read back, such as '#<procedure #2 foo> Cheers, P! -- Français, English, 日本語, 한국어

1 0