Gambit-list Octobre 2004

gambit-list@iro.umontreal.ca

14 participants
9 discussions

FFI & threads
by JURKSCH＠focus.ping.de 31 Oct '04

31 Oct '04

Hello, I don't find a solution how to suspend a gambit thread until input is available (and/or output is possible) on a file descriptor with known number, which is opened in non-blocking mode by a foreign library. Is there a clean way without polling? Regards Hermann

2 1

Compile problem with gcc-4.0 (development)
by Bradley Lucier 26 Oct '04

26 Oct '04

I get the following error on powerpc-apple-darwin7.5.0 with gambc40b11: > gcc -I../include -I. -no-cpp-precomp -Wall -W -Wno-unused -O1 > -fno-math-errno -fschedule-insns2 -fno-trapping-math > -fno-strict-aliasing -fomit-frame-pointer -fPIC -fno-common > -DHAVE_CONFIG_H -D___PRIMAL -D___LIBRARY > -D___GAMBCDIR=\"/usr/local/Gambit-C\" -c os_tty.c > gcc: unrecognized option `-no-cpp-precomp' > In file included from os.h:185, > from os_base.h:8, > from os_tty.c:14: > /usr/include/dlfcn.h:35:2: warning: #warning "You are using dlopen(), > a legacy API. Please use the Mach-O dylib loading APIs if at all > possible" > os_tty.c: In function 'lineeditor_output': > os_tty.c:2075: error: invalid storage class for function > 'lineeditor_output_terminal_emulate' > make[1]: *** [os_tty.o] Error 1 > make: *** [all] Error 1 > [descartes:~/programs/gambc40b11] lucier% gcc -v > Reading specs from > /pkgs/gcc-mainline/lib/gcc/powerpc-apple-darwin7.5.0/4.0.0/specs > Configured with: ../configure --prefix=/pkgs/gcc-mainline > --with-gmp=/pkgs/gmp-4.1.3 --with-mpfr=/pkgs/gmp-4.1.3 > Thread model: posix > gcc version 4.0.0 20041019 (experimental) This is in this strange code: if (d->emulate_terminal) { /* forward declaration needed because lineeditor_output is recursive */ ___HIDDEN ___SCMOBJ lineeditor_output_terminal_emulate ___P((___device_tty *self, ___C *buf, int len), ()); d->emulate_terminal = 0; e = lineeditor_output_terminal_emulate (d, buf, len); d->emulate_terminal = 1; } else e = extensible_string_insert (&d->output_char, d->output_char.length, len, buf); Can you even have a forward declaration here? Why not make declarations for all functions at the top of the file and not worry about it. (It works when I move the declaration to the top level and leave out the local "declaration".) Brad

1 0

Re: Gambit-C 4.0 beta 11
by Marc Feeley 26 Oct '04

26 Oct '04

> I tried this again under VS.NET 2003. Again, building a project with > lib\*.c and gsi\*.c, > adding <gambit>\include to the include paths. I also suppressed a few > warnings related to coercions. Could you send me a list of the warnings? I have already fixed a bunch of coercion problems between beta 10 and beta 11. > Here are the error messages: > > c:\Projects\Gambit\gambc40b11\lib\_num.c(52351): fatal error C1071: > unexpected end of file found in comment > > > I believe the problem is expressed in line 44720 of _num.c. > Here's that line: > > ___SET_F64(___F64V2,___F64DIV(___F64V1,___F64UNBOX(___GLO(53,___G__23__23_bignum_2e_inexact_2d_mdigit_2d_base)))) > > > I think what's going on is the ___F64UNBOX() is returning a string that > starts with '*' so the ___F64DIV expands to a string with '/*' in it. > > Here's the definition of ___F64DIV: > > #define ___F64DIV(x,y)(x/y) > > Changing this to > > #define ___F64DIV(x,y)(x/(y)) > > ... eliminates the error. This same problem occurs in two other functions: > > #define ___F64INV(x)1.0/x > #define ___FIXINV(x)___FIX((___FIX(1)/x)) > > I added parens around the x's and it compiles now. Great! I suspected something like this was going on and I'm glad you pinpointed the problem. > After running it, I got a console window and running some sort of > command line program. I tried to define factorial and got this > error when I typed the first ')': > > Run-Time Check Failure #3 - The variable 'e' is being used without > being defined. > line 2690 of os_tty.c > > That line is at the end of this function: > > lineeditor_output_terminal_op_move_abs > > I changed the declaration of e (the unbound variable to be this: > > ___SCMOBJ e = ___FIX(___NO_ERR); > > and it successfully ran (fact 1000). I haven't played with it > further yet. Nice catch. Which version of MS VC are you using? Did you use any special options to get these error checks? > Is there a test suite? Try "make check". You may have to install MinGW to get make. Otherwise look at tests/makefile and do the steps manually. Marc

3 2

Dynamic loading
by Peter Wang 25 Oct '04

25 Oct '04

Hello, I'm trying out the example instructions for bundling multiple source files into something that can be loaded with `load', but it appears a symbol is missing: (this is on linux) % gsc -flat -o foo.c m2 m3 % gcc -shared -fPIC -D___DYNAMIC m1.c m2.c m3.c foo.c -o foo.o1 -I/usr/local/Gambit-C/include % gsi foo *** ERROR IN ##main -- /tmp/foo.o1: undefined symbol: ____20_foo_2e_o1 (load "foo") And a thank you to all the Gambit authors. Peter

3 3

Gambit-C 4.0 beta 11
by Marc Feeley 24 Oct '04

24 Oct '04

A new beta of Gambit-C 4.0 is now available in source form at this address: http://www.iro.umontreal.ca/~feeley/gambc40b11.tar.gz Here are the main changes: - Continuations are now serializable (see the documentation for an example). - Some build issues on Solaris with the native compiler have been resolved (this may also fix some issues on HPUX and MS VC++). - HTML documentation is better formatted. - Minor changes to the bignum implementation. - The install script puts syntax-case.scm (Hieb and Dybvig's portable syntax-case implementation) in the Gambit installation directory, making it easier to use. Syntax-case.scm now works with the interpreter and compiler. Marc

1 0

Concurrency, ports, and blocking
by Matthew Morgan 22 Oct '04

22 Oct '04

I'm really enjoying Gambit 4.0 so far, but there are a few functions that I'm missing: I can't find a way to block on a set of items (ports, mutexes, whatever) until one becomes available. Does Gambit have an equivalent to Concurrent ML's select (or PLT Scheme's object-wait-multiple)? Along similar lines, is there an equivalent to char-ready? for non-character ports? Thanks, - Matt -- http://matthewmorgan.blogspot.com

1 0

help with port from DrScheme?
by rjl 22 Oct '04

22 Oct '04

If you don't want to use quack.el you can still get expression high-lighting with gambit.el: Go to the "Customise Emacs" option in the "Options" menu, choose "Browse Customization Groups", then goto: Emacs group: Editing group: Matching group: Paren Showing group: Show Paren Mode, "on" Show Paren Style, "expression" Paren Match Face, "choose a color you like" Show Paren Mismatch Face, "choose a color you like"

1 0

Gambit-C 4.0 beta 10
by Marc Feeley 21 Oct '04

21 Oct '04

A new beta of Gambit-C 4.0 is now available in source form at this address: http://www.iro.umontreal.ca/~feeley/gambc4b10.tar.gz Here are the main changes: - all homogeneous vector primitives (u32vector, etc) should now work properly - fixed a few "configure" problems on Mac OS X and Solaris - should build without problems on 64 bit machines (I have only checked on a SUN Ultra-sparc, so if you have access to a 64 bit machine, please report on your success) - interpreter handles procedure calls of up to 4 arguments faster than the general case (5 and more) - implementation of (vector 1 2 3 4) has been improved - I now include the portable "syntax-case" implementation that has been ported to version 4.0 of the Gambit-C interpreter (it is in misc/syntax-case.scm). To use it start gsi like this: gsi misc/syntax-case.scm - You can also rename the file to gambcext.scm and move it to the Gambit installation directory (and even compile it with "gsc -dynamic gambcext.scm" if you wish to speedup macro expansion). Unfortunately, if you use this package all source-code location is lost and debugging will be more difficult. Marc

2 2

help with port from DrScheme?
by Bill Richter 21 Oct '04

21 Oct '04

I just downloaded gambc40b9 (haven't even built it; Linux binaries seem to work), and I have some dumb questions about Gambit. I have a fair amount of DrScheme code, which runs very slow, and I'm a bit tired of PLT right now, although I profited a lot from their teaching approach. I thought I'd port to Gambit for a speed increase. So: Mostly I'm doing mod 2 linear algebra. That is, all my numbers are either 0 or 1. Isn't there some way to take advantage of that? Does Gambit have a case sensitive mode? I didn't see anything like this in the info files, but maybe there's an easy way to get it. Has anyone worked out ports of various DrScheme things, such as the local construction? Here's one dumb example: (define (merge-1 shortlist longlist less-than?) ;; (listof x)^2 (x x -> boolean) -> (listof x) ;; to merge a short list into a longer list, deleting repetitions, using less-than?. ;; (merge-1 '(4 8 9) '(1 2 3 5 6 7 9 10 11) <) => (1 2 3 4 5 6 7 8 10) (local ((define (phi a B X less-than?) ;; x (listof x)^2 (x x -> boolean) -> (listof x) ;; to send a X B to (x_1 ... x_r a (mu B (x_{r+1} ... ))) if x_r < a < x_{r+1} (if (empty? X) (cons a B) (let ([x_1 (first X)]) (if (equal? a x_1) (merge-1 B (rest X) less-than?) (if (less-than? a x_1) (cons a (merge-1 B X less-than?)) (cons x_1 (phi a B (rest X) less-than?)))))))) (if (empty? shortlist) longlist (phi (first shortlist) (rest shortlist) longlist less-than?)))) I could turn all my local's into letrec's of course. There's other DrScheme stuff I use, like their quicksort & mergesort, I imagine there's already (faster) Gambit versions of these

5 6

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

Gambit-list Octobre 2004