Gambit-list Avril 2013

gambit-list@iro.umontreal.ca

21 participants
51 discussions

Mixing namespaces and define-type
by Axis Sivitz 19 Avr '13

19 Avr '13

The define-type macro generates a handful of procedure definitions. If that type is defined inside a namespace, then it's difficult to export those symbols to the top-level namespace. Is there a better way than listing each of them by hand? It makes sense to me that there should be a macro that just generates the list of used symbols. Something like... (##namespace (cons "foo#" (define-type-symbols bar member1 member2) )) would transform to... (##namespace ("foo#" make-bar bar? bar-member1-set! and so on... ))

1 0

What's the performance issues about make-parameter about?
by Mikael 18 Avr '13

18 Avr '13

Dear Marc, What's the performance issues about make-parameter that you pointed out recently about? Ah btw on the same note, roughly how much more work is needed for capturing the continuation with |continuation-graft| or |call/cc|, than for allocating a closure? Just to get an idea of how expensive continuations are. I made a trivial call/cc test on my laptop and got something like 4 million call/cc:s per second, so clearly for trivial usecases the performance is extremely good. Would be happy to understand more how it plays out in complex code/execution environments, I mean, are we talking rather a million or a thousand per second? And.. invoking a continuation is roughly as cheap as invoking a closure right (maybe plus some phasing in and out stack content)? Thanks, Mikael

1 0

Unbound Variables in Remote REPL
by Axis Sivitz 18 Avr '13

18 Avr '13

I'm having trouble using the repl-server.scm that is included in the iOS example. I've embedded it into my iOS program, and I can connect to it and evaluate expressions once it is running in the simulator. However, none of my program definitions are available. Is there anything special I need to do to get the repl thread to run on the same namespace as the rest of my program? I think it's possible that my problem is related to how I compile my .scm files. I just (include ...) each of them into a main init.scm file, and then "gsc -link init.scm". Perhaps this might strip out the definitions from the scheme interpreter thread. In Marc's iOS example, each file is split up into, for example, repl-server.scm and repl-server#.scm, but I'm not sure what gsc command to use to compile them all without ending up with duplicate symbols (especially since many of them (include ...) the same files, like (##include "~~lib/gambit#.scm") ). Any help is appreciated. Thanks!

2 2

Scheme wrappers for a 3D game engine
by Marc Feeley 18 Avr '13

18 Avr '13

I just found the following blog on using Gambit for developing 3D games. http://www.animal-machine.com/blog/ It might be interesting to the members of the Gambit mailing list. Marc

1 0

Lisping Copyleft: A Close Reading of the Lisp LGPL
by Bradley Lucier 17 Avr '13

17 Avr '13

http://www.ifosslr.org/ifosslr/article/view/75/146 This is an article by a lawyer interpreting the Lisp LGPL (which I've adopted, with Christian Queinnec's permission, for Meroon). Perhaps it will be of interest to some people on the list. Brad

1 0

gcc.exe: error: _io.c: No such file or directory [Latest MinGW on Win7 x64]
by Ralph Moritz 17 Avr '13

17 Avr '13

I just cloned the Gambit GitHub repo & tried to build according to the instructions in INSTALL.txt but got errors running `make', after `make bootclean'. Please see details below. (Output has been truncated for brevity) This reminds me of the issue Bradley Lucifer reported, albeit for Mac OS X: http://article.gmane.org/gmane.lisp.scheme.gambit/5876 $ ./configure --enable-single-host --enable-c-opt --enable-gcc-opts -- prefix=/c/gambc && make bootstrap $ git status # Untracked files: # gsc-boot.exe # libgambc.a # libgambcgsc.a # libgambcgsi.a $ make bootclean $ git status # Changes not staged for commit: # deleted: gsc/_asm.c # deleted: gsc/_assert.c # deleted: gsc/_back.c # deleted: gsc/_codegen.c # deleted: gsc/_env.c # deleted: gsc/_front.c # deleted: gsc/_gambcgsc.c # deleted: gsc/_gsc.c # deleted: gsc/_gsc_.c # deleted: gsc/_gsclib.c # deleted: gsc/_gvm.c # deleted: gsc/_host.c # deleted: gsc/_parms.c # deleted: gsc/_prims.c # deleted: gsc/_ptree1.c # deleted: gsc/_ptree2.c # deleted: gsc/_source.c # deleted: gsc/_t-c-1.c # deleted: gsc/_t-c-2.c # deleted: gsc/_t-c-3.c # deleted: gsc/_t-univ.c # deleted: gsc/_utils.c # deleted: gsc/_x86.c # deleted: gsi/_gambcgsi.c # deleted: gsi/_gsi.c # deleted: gsi/_gsi_.c # deleted: gsi/_gsilib.c # deleted: lib/_eval.c # deleted: lib/_gambc.c # deleted: lib/_io.c # deleted: lib/_kernel.c # deleted: lib/_nonstd.c # deleted: lib/_num.c # deleted: lib/_repl.c # deleted: lib/_std.c # deleted: lib/_system.c # deleted: lib/_thread.c # # Untracked files: # gsc-boot.exe # libgambc.a # libgambcgsc.a # libgambcgsi.a $ make rm -f gsc-boot cp gsc-boot.unix gsc-boot chmod +x gsc-boot if test ".bat" != ""; then \ rm -f gsc-boot.bat; \ cp gsc-boot.bat.windows gsc-boot.bat; \ fi making all in include make[1]: Entering directory `/f/ralph/temp/src/gambit/include' major=`echo v4.6.7 | sed -e "s/v//g" -e "s/\.[^.]*\.[^.]*//g"`; \ minor=`echo v4.6.7 | sed -e "s/v[^.]*\.//g" -e "s/\.[^.]*//g"`; \ revision=`echo v4.6.7 | sed -e "s/v[^.]*\.[^.]*\.//g" -e "s///g"`; \ version_num=`eval expr "$ 100000 \\* $major $ + $ 1000 \\* $minor $ + $revision"`; \ echo "#error \"The version indicated in ___VERSION is not supported by g ambit.h\"" > gambit-not$version_num.h; \ echo "#error \"You are probably compiling C code generated by a Gambit c ompiler earlier or later than v4.6.7\"" >> gambit-not$version_num.h; \ echo "#error \"___VERSION will be set to $version_num to reduce other er rors\"" >> gambit-not$version_num.h; \ echo "#undef ___VERSION" >> gambit-not$version_num.h; \ echo "#define ___VERSION $version_num" >> gambit-not$version_num.h; \ echo "#include \"gambit.h\"" >> gambit-not$version_num.h make[1]: Leaving directory `/f/ralph/temp/src/gambit/include' making all in lib make[1]: Entering directory `/f/ralph/temp/src/gambit/lib' ../gsc-boot -:~~bin=../bin,~~lib=../lib,~~include=../include -f -c -check _io.s cm gcc -D_WINDOWS -Wno-unused -Wno-write-strings -O2 -fno-math-errno - fschedule-in sns2 -fno-trapping-math -fno-strict-aliasing -fwrapv -fno-keep-inline- dllexport -fmodulo-sched -freschedule-modulo-scheduled-loops -fno-common -mieee-fp - I".. /include" -c -o "_io.o" -I. -DHAVE_CONFIG_H -D___GAMBCDIR="\"/c/gambc\"" - D___SY S_TYPE_CPU="\"i686\"" -D___SYS_TYPE_VENDOR="\"pc\"" - D___SYS_TYPE_OS="\"mingw32\ "" -D___CONFIGURE_COMMAND="\"./configure '--enable-single-host' '--enable-c- opt' '--enable-gcc-opts' '--prefix=/c/gambc'"\" -D___OBJ_EXTENSION="\".o\"" - D___EXE _EXTENSION="\".exe\"" -D___BAT_EXTENSION="\".bat\"" -D___PRIMAL _io.c - D___LIBRA RY gcc.exe: error: _io.c: No such file or directory gcc.exe: fatal error: no input files compilation terminated. make[1]: *** [_io.o] Error 1 make[1]: Leaving directory `/f/ralph/temp/src/gambit/lib' make: *** [all-recursive] Error 1 $ git status ... # Untracked files: # gsc-boot # gsc-boot.bat # gsc-boot.exe # libgambc.a # libgambcgsc.a # libgambcgsi.a

4 15

#ifdef equivalent in Scheme?
by Ralph Moritz 17 Avr '13

17 Avr '13

I'm trying to get Black Hole trunk to run on Windows & need to compile different Scheme code depending on the target OS. eg. On Unix-like OSes the following is ok: (compile-file-to-target "/dev/null" output: fn options: options)) ...but on Windows `/dev/null' needs to be replaced with `\\\\.\\NUL'. In C I'd do something like: #ifdef _WINDOWS /* or whatever */ # define NULLDEV "\\\\.\\NUL" #else # define NULLDEV "/dev/null" #endif Is there a Scheme equivalent to #ifdef et al? If the answer is `no' then please tell me what you'd do in this case? Thx, Ralph -- Using Opera's mail client: http://www.opera.com/mail/

3 2

Re: [gambit-list] FFI **Argv
by sales.creditscore＠creditscore.co.nz 17 Avr '13

17 Avr '13

> > In C the type char* usually represents a string, but it can also represent a generic pointer to memory. You have to tell the Gambit Scheme compiler what your intention is, so that it knows how to convert Scheme strings to that type. So instead of (pointer char) you have to use nonnull-char-string . Your array of strings is also terminated by NULL, so you need to say that too. This is the type nonnull-char-string-list . Use that instead of (pointer (pointer char) #f) . > > Marc > Brilliant. That fixed it. Thanks very much. Rob.

1 0

FFI in REPL?
by Zhen Shen 16 Avr '13

16 Avr '13

Does the interpreter support FFI ? If not, then how can I "embed" custom FFI definitions into gsi so that they're available in REPL?? shen@ubuntu:~/gambc-v4_6_7-devel$ head test.scm (c-declare "#include \"SDL.h\"") ;;; SDL Constants ;;; (define sdl-init-timer #x00000001) (define sdl-init-audio #x00000010) (define sdl-init-video #x00000020) (define sdl-init-cdrom #x00000100) (define sdl-init-joystick #x00000200) (define sdl-init-noparachute #x00100000) (define sdl-init-eventthread #x01000000) shen@ubuntu:~/gambc-v4_6_7-devel$ gsi test.scm *** ERROR IN "test.scm"@1.1 -- Interpreter does not support ##c-declare

3 2

Problem linking libgambc.a into iOS build
by Axis Sivitz 16 Avr '13

16 Avr '13

I'm trying to get Gambit working for iOS development. I've successfully built libgambc.a for the all three architectures (i386, armv7, armv7s), but I'm getting linker errors when compiling for both the simulator and the device: Undefined symbols for architecture i386: "___cleanup()", referenced from: gambit_cleanup() in ViewController.o "___setup_params_reset(___setup_params_struct*)", referenced from: gambit_setup() in ViewController.o "___disable_heartbeat_interrupts()", referenced from: gambit_setup() in ViewController.o "___NONNULLCHARSTRINGLIST_to_NONNULLUCS_2STRINGLIST(char**, unsigned short***)", referenced from: gambit_setup() in ViewController.o "___setup(___setup_params_struct*)", referenced from: gambit_setup() in ViewController.o "_main_argv", referenced from: gambit_setup() in ViewController.o ld: symbol(s) not found for architecture i386 clang: error: linker command failed with exit code 1 (use -v to see invocation) I built the library using the build-gambit-iOS script with the following changes: ios_version="6.1" export PATH="/Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/bin:$PATH" ^---This is what Xcode uses now instead of a separate compiler binary for each platform. And I changed the compiler to clang. Some more info: $ file libgambc.a libgambc.a: Mach-O universal binary with 3 architectures libgambc.a (for architecture i386): current ar archive random library libgambc.a (for architecture armv7): current ar archive random library libgambc.a (for architecture cputype (12) cpusubtype (11)): current ar archive random library $ nm libgambc.a | grep ___disable_heartbeat U ____disable_heartbeat_interrupts U ____disable_heartbeat_interrupts 00000450 T ____disable_heartbeat_interrupts U ____disable_heartbeat_interrupts U ____disable_heartbeat_interrupts U ____disable_heartbeat_interrupts 000003a0 T ____disable_heartbeat_interrupts U ____disable_heartbeat_interrupts U ____disable_heartbeat_interrupts U ____disable_heartbeat_interrupts 000003a0 T ____disable_heartbeat_interrupts U ____disable_heartbeat_interrupts Here's the failing build command (for simulator): Ld /Users/asdf/Library/Developer/Xcode/DerivedData/flip-fcbkezkyqdgezscmmmtweckhrzoj/Build/Products/Debug-iphonesimulator/flip.app/flip normal i386 cd /Users/asdf/Development/flip setenv IPHONEOS_DEPLOYMENT_TARGET 6.1 setenv PATH "/Applications/Xcode.app/Contents/Developer/Platforms/iPhoneSimulator.platform/Developer/usr/bin:/Applications/Xcode.app/Contents/Developer/usr/bin:/usr/bin:/bin:/usr/sbin:/sbin" /Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/bin/clang++ -arch i386 -isysroot /Applications/Xcode.app/Contents/Developer/Platforms/iPhoneSimulator.platform/Developer/SDKs/iPhoneSimulator6.1.sdk -L/Users/asdf/Library/Developer/Xcode/DerivedData/flip-fcbkezkyqdgezscmmmtweckhrzoj/Build/Products/Debug-iphonesimulator -L/Users/asdf/Downloads/gambc-v4_6_7-devel/misc/gambit-iOS/current/lib -F/Users/asdf/Library/Developer/Xcode/DerivedData/flip-fcbkezkyqdgezscmmmtweckhrzoj/Build/Products/Debug-iphonesimulator -filelist /Users/asdf/Library/Developer/Xcode/DerivedData/flip-fcbkezkyqdgezscmmmtweckhrzoj/Build/Intermediates/flip.build/Debug-iphonesimulator/flip.build/Objects-normal/i386/flip.LinkFileList -Xlinker -objc_abi_version -Xlinker 2 -lgambc -fobjc-link-runtime -Xlinker -no_implicit_dylibs -stdlib=libc++ -mios-simulator-version-min=6.1 -framework OpenAL -framework AudioToolbox -framework AVFoundation -framework UIKit -framework Foundation -framework CoreGraphics -framework GLKit -framework OpenGLES -o /Users/asdf/Library/Developer/Xcode/DerivedData/flip-fcbkezkyqdgezscmmmtweckhrzoj/Build/Products/Debug-iphonesimulator/flip.app/flip Any advice is appreciated. Thanks!

2 2

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

Gambit-list Avril 2013