Gambit-list Juillet 2006

gambit-list@iro.umontreal.ca

11 participants
18 discussions

multiple main functions!
by Ryan Prescott 21 Jul '06

21 Jul '06

Hi, I've perused the archives of the Gambit-C mailing list looking for info on this issue so I apologize if this is a well known issue. I've got a C application that I want to use a gambit thread (actually a termite process). I have a main function defined in C and a library defined in scheme that I want to init/call from C. Unfortunately, I get multiple main functions when building and the msvc linker doesn't like that too much. Being brave, I instructed the linker to ignore the multiple main error condition and "just use" my C main func. This does NOT seem to result in a stable situation for the scheme world, as when I call __setup() I get an exception. Note that the exception is handled by the gambit runtime, but there definitely seems to be some init time badness. The termite process does not respond to messages, etc. I also tried defining ___LIBRARY during C builds to no avail. This did get rid of the multiple main error, but I still get the exception. Is there any way to get gambit to not generate a main function? I guess I was looking for something like chicken's -embedded option. I had some amount of hope when perusing gambit.h at the -flat option, but I think this requires me to resolve functions at startup manually. (chicken doc reference http://galinha.ucpel.tche.br/Embedding) FYI I'm building the scheme code with: gsc -f -check myfile.scm Thanks, Ryan

2 2

stepper hook
by Christian 21 Jul '06

21 Jul '06

Hello I want to add code to store the current continuation of each step in the single-stepper (to be able to feed it to ##repl-within or similar). How can I do it? I have found the ##main-stepper hook and the (##step-handler leapable? $code rte execute-body . other) definition. I've tried: (define conts '()) (define (stepper-init) (set! ##main-stepper (vector (make-vector 7 (lambda args (apply (lambda (leapable? $code rte execute-body . other) (set! conts (cons $code conts)) (apply ##step-handler args)) args))) #f #f #f #f #f #f #f))) But I can't manage to extract the continuation out of either |$code|, |rte|, |execute-body| or |other|. How is |$code| being structured? (I'm seeing that $code is being extracted out of cont in several places, so maybe it's not possible to the the continuation this way.) I've also tried: (define (stepper-init) (set! ##main-stepper (vector (make-vector 7 (lambda args (##continuation-capture (lambda (cont) (set! conts (cons cont conts)) (let ((res (apply ##step-handler args))) (step);; attempt against stepping being turned off res))))) #f #f #f #f #f #f #f))) but somehow single-stepping seems to be turned off after a few steps (even if my above code is compiled). I don't get any interesting continuation this way. Could you please guide me a bit? Thanks Christian.

2 2

favicon.ico on gambit web site
by Bradley Lucier 18 Jul '06

18 Jul '06

Marc: Your favicon.ico on the gambit web site (the horse head) is black and white. Unless you think that the white square is part of the logo, it should be black and transparent, so the white part takes the color of the background pattern. (See the icon for the math department at www.math.purdue.edu for what I mean.) Brad

1 0

Have you fixed the code sequence for JUMPGLOSAFE?
by Bradley Lucier 18 Jul '06

18 Jul '06

Marc: I hope you fixed the code for JUMPGLOSAFE and friends as I suggested in http://mailman.iro.umontreal.ca/pipermail/gambit-list/2006-March/ 000662.html Here are the sizes of the macro-expanded .i files for the libraries I use in my homework-on-the-web system: zuse-138% wc all-libs*.i 280652 563890 14846379 all-libs-2.i 280652 692371 17223267 all-libs.i 561304 1256261 32069646 total all-libs.i uses the default ___OPTIMIZE_TIME, all-libs-2.i uses ___OPTIMIZE_SPACE. That's with the default (declare (mostly- fixnum)); it will be larger with (declare (mostly-fixnum-flonun)), which you said you'd set as the default for the next beta. gcc-4.1.1 has been cranking on all-libs.c now for over 40 minutes on my (admittedly lame) ultrasparc, but that's the machine that will run the system, so if I compile it, I need to compile it there. Brad

1 0

Newby question on compiling Gambit output
by Kenneth Kellum 11 Jul '06

11 Jul '06

If this is a FAQ, sorry. I'm trying to use Gambit-C to get an executable version of a Scheme program. I'm comfortable with Scheme, but haven't used C in many years. I'm running Windows XP. I downloaded Gambit-C, version 4.0 beta 9. I've succeeded in using Gambit to translate foo.scm into foo.c. After quite a while looking for documentation I'm still clueless as to how to compile and link foo.c. I've tried both MS Visual Studio and Watcom-1.3. Any help will be greatly appreciated.

3 4

port-name
by Christian 11 Jul '06

11 Jul '06

Hello I've been looking for a way to get the file path of a file port, and have found ##port-name. I would find it worthwhile to add an official port-name function (and document it). (Should I just send a patch for such requests in the future?) Thanks Christian.

1 0

read-line behaviour changed between beta15 and beta17 (MinGW)
by François Magnan 10 Jul '06

10 Jul '06

Hi, When I compile the following program (define (command-loop) (let ((command (read-line))) (serve-command command) (command-loop))) (command-loop) in Gambit-C4.0b15 with the MinGW (win32) platform it works as expected when I execute it in a DOS window (I can enter some lines and they get echoed by the pp). However, when I compile the same program using beta17, only the first line is echoed and after that, I get only an infinite serie of #!eof. This only happens in a DOS window. If I execute the program from a MinGW shell it works as expected. How can I change this behavior? Is this a port-setting problem? Thank you, Francois Magnan

1 1

problem with memq
by Stephane Le Cornec 06 Jul '06

06 Jul '06

I don't have a clue how I managed to get that result. I am trying to simplify and reproduce. Anyone has an idea on how this could happen? zz is set! in a lambda called by a macro in cotypes. Gambit Version 4.0 beta 17 > (aa) "c:/dev/aaScratch/com/costruct.scm" > (define zz 0) > (aac "cotypes") #t > zz '(ctype: "short" type*: VT_PTR ctype*: "void*" ctype+: #f) > (memq type*: zz) #f > (define xx '(ctype: "short" type*: VT_PTR ctype*: "void*" ctype+: #f)) > (memq type*: xx) (type*: VT_PTR ctype*: "void*" ctype+: #f) > -- Stephane! coleste(a)videotron.ca (Stephane Le Cornec) +------------------- Made with recycled electrons. --------------------+ | #include <disclaimer.h> Kebekkujin desu. | +---------<http://www.starfiredesign.com/starfire/index.html>----------+

1 1

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

Gambit-list Juillet 2006