Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm List-Subscribe: List-Archive: List-Post: List-Help: , Sender: cygwin-owner AT cygwin DOT com Mail-Followup-To: cygwin AT cygwin DOT com Delivered-To: mailing list cygwin AT cygwin DOT com Reply-To: From: "Jason C. Johnston" To: Subject: Guile: Weirdness in syncase module? Date: Fri, 2 Aug 2002 17:44:56 +1000 Message-ID: <000001c239f8$82bf6850$e4161cd3@Dell> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="----=_NextPart_000_0001_01C23A4C.546B7850" X-Priority: 3 (Normal) X-MSMail-Priority: Normal Importance: Normal X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000 ------=_NextPart_000_0001_01C23A4C.546B7850 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit Hello all, Playing around with Guile, I have experienced a problem trying to use the syncase module. Disclaimer 1: I have checked the docs in /usr/doc and /usr/doc/Cygwin, the man and info pages, and have done a site-restricted Google search on the archives with 'guile syntax' and 'guile syncase'. No luck there. Disclaimer 2: This may not relate specifically to the Cygwin implementation of Guile + modules, but I thought it best to try here first. WEIRDNESS 0. Perhaps this isn't really weird, but I just wondered why, since define-syntax, syntax-rules and friends are specified as part of the core Scheme language in R5RS (which the info pages claim to implement), one has to load a module to use them. However, probably OT (ie not Cygwin-specific), so never mind. WEIRDNESS 1. See the following transcript: guile> (use-modules (ice-9 syncase)) /usr/share/guile/1.5.6/ice-9/syncase.scm:171:18: In expression (make-mutex): /usr/share/guile/1.5.6/ice-9/syncase.scm:171:18: Unbound variable: make-mutex ABORT: (unbound-variable) guile> (use-modules (ice-9 syncase)) guile> define-syntax # The first attempt to load (ice-9 syncase) always gives me that error message about make-mutex, and then a subsequent attempt to load it works, in the sense that no error message is generated and define-syntax is there as a variable whose value is the macro sc-macro. However... WEIRDNESS 2. Any attempt to actually use define-syntax fails, eg guile> (define-syntax nothing-but-the-truth ... (syntax-rules () ... ((_) #t))) /usr/share/guile/1.5.6/ice-9/syncase.scm:70:7: In expression (sc-expand exp): /usr/share/guile/1.5.6/ice-9/syncase.scm:70:7: Wrong type to apply: #f ABORT: (misc-error) guile> Having a look at syncase.scm goes some way to explaining this: * define-syntax is defined in terms of sc-macro: 82: (define define-syntax sc-macro) * sc-macro is implemented using sc-expand: 67: (define sc-macro 68: (procedure->memoizing-macro 69: (lambda (exp env) 70: (sc-expand exp)))) * and sc-expand is defined as false: 74: (define sc-expand #f) So it looks like the expression (define-syntax blah-blah ...) is winding up as (#f blah-blah ...), which explains the error message. Could something like a re-definition of sc-expand have fallen off the end of the file? Or should one load some other module/package first, or afterwards? Output of cygcheck -svr attached as cygcheck.txt. Cheers, Jason _____________________________________________ Jason C. Johnston mailto:jason AT astadhyayi DOT net http://www.astadhyayi.net ------=_NextPart_000_0001_01C23A4C.546B7850 Content-Type: text/plain; name="cygcheck.txt" Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename="cygcheck.txt" Cygwin Win95/NT Configuration Diagnostics Current System Time: Fri Aug 02 17:34:07 2002 Windows XP Professional Ver 5.1 Build 2600=20 Path: C:\Documents and Settings\Jason C. Johnston\My = Documents\cygwin-home\jcj\dev\bin C:\Documents and Settings\Jason C. Johnston\My = Documents\cygwin-home\jcj\bin C:\cygwin\usr\local\bin C:\cygwin\bin C:\cygwin\bin c:\bin c:\Tcl\bin c:\texmf\miktex\bin c:\WINDOWS\system32 c:\WINDOWS c:\WINDOWS\System32\Wbem c:\emacs\emacs-21.1\bin SysDir: C:\WINDOWS\System32 WinDir: C:\WINDOWS HOME =3D `C:\Documents and Settings\Jason C. Johnston\My = Documents\cygwin-home\jcj' MAKE_MODE =3D `unix' PWD =3D `/usr/share/guile/1.5.6/ice-9' USER =3D `Jason C. Johnston' ALLUSERSPROFILE =3D `C:\Documents and Settings\All Users' APPDATA =3D `C:\Documents and Settings\Jason C. Johnston\Application = Data' CLIENTNAME =3D `Console' COMMONPROGRAMFILES =3D `C:\Program Files\Common Files' COMPUTERNAME =3D `DELL' COMSPEC =3D `C:\WINDOWS\system32\cmd.exe' CVSEDITOR =3D `/usr/bin/vim' CVSROOT =3D `/usr/local/cvsroot' FIGNORE =3D `.o:~' HOMEDRIVE =3D `C:' HOMEPATH =3D `\Documents and Settings\Jason C. Johnston' LOGONSERVER =3D `\\DELL' MANPATH =3D `:/usr/ssl/man' NUMBER_OF_PROCESSORS =3D `1' OLDPWD =3D `/usr/doc/Cygwin' OS =3D `Windows_NT' PATHEXT =3D `.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.tcl' PROCESSOR_ARCHITECTURE =3D `x86' PROCESSOR_IDENTIFIER =3D `x86 Family 15 Model 1 Stepping 2, = GenuineIntel' PROCESSOR_LEVEL =3D `15' PROCESSOR_REVISION =3D `0102' PROGRAMFILES =3D `C:\Program Files' PROMPT =3D `@ ' PS1 =3D `\[\033]0;\w\007\033[32m\]$\[\033[33m\033[0m\] ' SESSIONNAME =3D `Console' SHLVL =3D `1' SYSTEMDRIVE =3D `C:' SYSTEMROOT =3D `C:\WINDOWS' TEMP =3D `c:\DOCUME~1\JASONC~1.JOH\LOCALS~1\Temp' TERM =3D `cygwin' TMP =3D `c:\DOCUME~1\JASONC~1.JOH\LOCALS~1\Temp' USERDOMAIN =3D `DELL' USERNAME =3D `Jason C. Johnston' USERPROFILE =3D `C:\Documents and Settings\Jason C. Johnston' WINDIR =3D `C:\WINDOWS' _ =3D `/usr/bin/cygcheck' HKEY_CURRENT_USER\Software\Cygnus Solutions HKEY_CURRENT_USER\Software\Cygnus Solutions\Cygwin HKEY_CURRENT_USER\Software\Cygnus Solutions\Cygwin\mounts v2 (default) =3D `/cygdrive' cygdrive flags =3D 0x00000022 HKEY_CURRENT_USER\Software\Cygnus Solutions\Cygwin\mounts v2\/home (default) =3D `C:\Documents and Settings\Jason C. Johnston\My = Documents\cygwin-home' flags =3D 0x00000000 HKEY_CURRENT_USER\Software\Cygnus Solutions\Cygwin\Program Options HKEY_LOCAL_MACHINE\SOFTWARE\Cygnus Solutions HKEY_LOCAL_MACHINE\SOFTWARE\Cygnus Solutions\Cygwin HKEY_LOCAL_MACHINE\SOFTWARE\Cygnus Solutions\Cygwin\mounts v2 (default) =3D `/cygdrive' cygdrive flags =3D 0x00000022 HKEY_LOCAL_MACHINE\SOFTWARE\Cygnus Solutions\Cygwin\mounts v2\/ (default) =3D `C:/cygwin' flags =3D 0x0000000a HKEY_LOCAL_MACHINE\SOFTWARE\Cygnus Solutions\Cygwin\mounts v2\/usr/bin (default) =3D `C:/cygwin/bin' flags =3D 0x0000000a HKEY_LOCAL_MACHINE\SOFTWARE\Cygnus Solutions\Cygwin\mounts v2\/usr/lib (default) =3D `C:/cygwin/lib' flags =3D 0x0000000a HKEY_LOCAL_MACHINE\SOFTWARE\Cygnus Solutions\Cygwin\Program Options a: fd N/A N/A =20 c: hd NTFS 19037Mb 28% CP CS UN PA FC =20 d: fd FAT 95Mb 38% CP UN PICS e: cd N/A N/A =20 C:\Documents and Settings\Jason C. Johnston\My Documents\cygwin-home = /home user textmode . = /cygdrive user binmode,cygdrive C:/cygwin / = system binmode C:/cygwin/bin = /usr/bin system binmode C:/cygwin/lib = /usr/lib system binmode . = /cygdrive user binmode,cygdrive Found: C:\cygwin\bin\bash.exe Found: C:\cygwin\bin\cat.exe Found: C:\cygwin\bin\cpp.exe Found: C:\cygwin\bin\find.exe Found: C:\cygwin\bin\gcc.exe Found: C:\cygwin\bin\gdb.exe Found: C:\cygwin\bin\ld.exe Found: C:\cygwin\bin\ls.exe Found: C:\cygwin\bin\make.exe Found: C:\cygwin\bin\sh.exe 58k 2002/05/07 C:\cygwin\bin\cygbz2-1.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygbz2-1.dll" v0.0 ts=3D2002/5/7 16:33 625k 2002/07/30 C:\cygwin\bin\cygcrypto.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygcrypto.dll" v0.0 ts=3D2002/7/31 1:32 452k 2002/07/17 C:\cygwin\bin\cygcurl-2.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygcurl-2.dll" v0.0 ts=3D2002/7/18 0:50 45k 2001/04/25 C:\cygwin\bin\cygform5.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygform5.dll" v0.0 ts=3D2001/4/25 15:28 35k 2002/01/09 C:\cygwin\bin\cygform6.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygform6.dll" v0.0 ts=3D2002/1/9 17:03 19k 2002/02/20 C:\cygwin\bin\cyggdbm.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cyggdbm.dll" v0.0 ts=3D2002/2/20 14:05 488k 2002/07/18 C:\cygwin\bin\cygguile-14.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygguile-14.dll" v0.0 ts=3D2002/7/18 20:35 63k 2002/07/18 C:\cygwin\bin\cygguile-srfi-srfi-13-14-1.dll - = os=3D4.0 img=3D1.0 sys=3D4.0 "cygguile-srfi-srfi-13-14-1.dll" v0.0 ts=3D2002/7/18 = 20:35 24k 2002/07/18 C:\cygwin\bin\cygguile-srfi-srfi-4-1.dll - os=3D4.0 = img=3D1.0 sys=3D4.0 "cygguile-srfi-srfi-4-1.dll" v0.0 ts=3D2002/7/18 20:35 14k 2002/07/18 C:\cygwin\bin\cygguilereadline-14.dll - os=3D4.0 = img=3D1.0 sys=3D4.0 "cygguilereadline-14.dll" v0.0 ts=3D2002/7/18 20:35 17k 2001/06/28 C:\cygwin\bin\cyghistory4.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cyghistory4.dll" v0.0 ts=3D2001/1/7 15:34 20k 2002/07/17 C:\cygwin\bin\cyghistory5.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cyghistory5.dll" v0.0 ts=3D2002/7/18 7:18 929k 2002/06/24 C:\cygwin\bin\cygiconv-2.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygiconv-2.dll" v0.0 ts=3D2002/6/25 4:24 22k 2001/12/13 C:\cygwin\bin\cygintl-1.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygintl-1.dll" v0.0 ts=3D2001/12/13 20:28 23k 2002/06/24 C:\cygwin\bin\cygintl-2.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygintl-2.dll" v0.0 ts=3D2002/6/24 14:54 21k 2001/06/20 C:\cygwin\bin\cygintl.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygintl.dll" v0.0 ts=3D2001/6/21 3:09 81k 2001/10/20 C:\cygwin\bin\cygitcl30.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygitcl30.dll" v0.0 ts=3D2001/10/20 10:25 35k 2001/10/20 C:\cygwin\bin\cygitk30.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygitk30.dll" v0.0 ts=3D2001/10/20 10:25 119k 2002/02/09 C:\cygwin\bin\cygjpeg6b.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygjpeg6b.dll" v0.0 ts=3D2002/2/9 16:19 25k 2002/07/16 C:\cygwin\bin\cygltdl-3.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygltdl-3.dll" v0.0 ts=3D2002/7/16 14:05 26k 2001/04/25 C:\cygwin\bin\cygmenu5.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygmenu5.dll" v0.0 ts=3D2001/4/25 15:27 20k 2002/01/09 C:\cygwin\bin\cygmenu6.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygmenu6.dll" v0.0 ts=3D2002/1/9 17:03 156k 2001/04/25 C:\cygwin\bin\cygncurses++5.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygncurses++5.dll" v0.0 ts=3D2001/4/25 15:29 175k 2002/01/09 C:\cygwin\bin\cygncurses++6.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygncurses++6.dll" v0.0 ts=3D2002/1/9 17:03 226k 2001/04/25 C:\cygwin\bin\cygncurses5.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygncurses5.dll" v0.0 ts=3D2001/4/25 15:17 202k 2002/01/09 C:\cygwin\bin\cygncurses6.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygncurses6.dll" v0.0 ts=3D2002/1/9 17:03 15k 2001/04/25 C:\cygwin\bin\cygpanel5.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygpanel5.dll" v0.0 ts=3D2001/4/25 15:27 12k 2002/01/09 C:\cygwin\bin\cygpanel6.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygpanel6.dll" v0.0 ts=3D2002/1/9 17:03 40k 2001/11/21 C:\cygwin\bin\cygpcre.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygpcre.dll" v0.0 ts=3D2001/11/22 9:15 39k 2001/11/21 C:\cygwin\bin\cygpcreposix.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygpcreposix.dll" v0.0 ts=3D2001/11/22 9:15 179k 2002/07/22 C:\cygwin\bin\cygpng12.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygpng12.dll" v0.0 ts=3D2002/7/23 2:03 170k 2002/01/21 C:\cygwin\bin\cygpng2.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygpng2.dll" v0.0 ts=3D2002/1/21 12:05 22k 2002/06/09 C:\cygwin\bin\cygpopt-0.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygpopt-0.dll" v0.0 ts=3D2002/6/9 15:45 108k 2001/06/28 C:\cygwin\bin\cygreadline4.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygreadline4.dll" v0.0 ts=3D2001/1/7 15:34 127k 2002/07/17 C:\cygwin\bin\cygreadline5.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygreadline5.dll" v0.0 ts=3D2002/7/18 7:18 160k 2002/07/30 C:\cygwin\bin\cygssl.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygssl.dll" v0.0 ts=3D2002/7/31 1:32 390k 2001/10/20 C:\cygwin\bin\cygtcl80.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygtcl80.dll" v0.0 ts=3D2001/10/20 10:24 5k 2001/10/20 C:\cygwin\bin\cygtclpip80.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 10k 2001/10/20 C:\cygwin\bin\cygtclreg80.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygtclreg80.dll" v0.0 ts=3D2001/10/20 10:24 253k 2002/02/10 C:\cygwin\bin\cygtiff3.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygtiff3.dll" v0.0 ts=3D2002/2/10 19:34 623k 2001/10/20 C:\cygwin\bin\cygtk80.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygtk80.dll" v0.0 ts=3D2001/10/20 10:25 50k 2002/03/12 C:\cygwin\bin\cygz.dll - os=3D4.0 img=3D1.0 sys=3D4.0 "cygz.dll" v0.0 ts=3D2002/3/12 15:38 883k 2002/07/06 C:\cygwin\bin\cygwin1.dll - os=3D4.0 img=3D1.0 = sys=3D4.0 "cygwin1.dll" v0.0 ts=3D2002/7/6 16:16 Cygwin DLL version info: DLL version: 1.3.12 DLL epoch: 19 DLL bad signal mask: 19005 DLL old termios: 5 DLL malloc env: 28 API major: 0 API minor: 54 Shared data: 3 DLL identifier: cygwin1 Mount registry: 2 Cygnus registry name: Cygnus Solutions Cygwin registry name: Cygwin Program options name: Program Options Cygwin mount registry name: mounts v2 Cygdrive flags: cygdrive flags Cygdrive prefix: cygdrive prefix Cygdrive default prefix:=20 Build date: Sat Jul 6 02:16:58 EDT 2002 CVS tag: cygwin-1-3-12-1 Shared id: cygwin1S3 Cygwin Package Information Last downloaded files to: C:\CygwinDownloads Last downloaded files from: ftp://mirror.aarnet.edu.au/pub/cygwin Package Version =20 _update-info-dir 00039-1 =20 ash 20020131-1 =20 autoconf 2.53b-1 =20 autoconf-devel 2.53a-1 =20 autoconf-stable 2.13-4 =20 automake 1.6.2-1 =20 automake-devel 1.6.2-1 =20 automake-stable 1.4p5-5 =20 bash 2.05b-2 =20 bc 1.06-1 =20 binutils 20020706-2 =20 bison 1.35-1 =20 byacc 1.9-1 =20 bzip2 1.0.2-2 =20 clear 1.0-1 =20 cpio 2.4.2 =20 crypt 1.0-1 =20 ctags 5.2-1 =20 curl 7.9.8-2 =20 cvs 1.11.0-1 =20 cygutils 1.1.2-1 =20 cygwin 1.3.12-2 =20 cygwin-doc 1.0-1 =20 dejagnu 20010117-1 =20 diff 1.0-1 =20 diffutils 2.8.1-1 =20 expect 20010117-1 =20 file 3.37-1 =20 fileutils 4.1-1 =20 findutils 4.1.7-4 =20 flex 2.5.4-2 =20 gawk 3.0.4-1 =20 gcc 2.95.3-5 =20 gdb 20010428-3 =20 gdbm 1.8.0-4 =20 gettext 0.11.2-2 =20 ghostscript 7.05-1 =20 ghostscript-base 7.05-1 =20 gperf 0.0 =20 grep 2.5-1 =20 groff 1.17.2-1 =20 guile 1.5.6-5 =20 guile-devel 1.5.6-5 =20 guile-doc 1.5.6-5 =20 gzip 1.3.3-3 =20 indent 2.2.8-1 =20 jpeg 6b-7 =20 less 374-1 =20 libbz2_1 1.0.2-2 =20 libguile14 1.5.6-5 =20 libiconv2 1.8-2 =20 libintl 0.10.38-3 =20 libintl1 0.10.40-1 =20 libintl2 0.11.2-2 =20 libltdl3 20020705-2 =20 libncurses5 5.2-1 =20 libncurses6 5.2-8 =20 libpng 1.2.4-2 =20 libpng12 1.2.4-2 =20 libpng2 1.0.12-1 =20 libpopt0 1.6.4-4 =20 libreadline4 4.1-2 =20 libreadline5 4.3-1 =20 libtool 20020705-1 =20 libtool-devel 20020705-2 =20 libtool-stable 1.4.2-2 =20 login 1.4-3 =20 lynx 2.8.4-1 =20 m4 0.0 =20 make 3.79.1-7 =20 man 1.5g-2 =20 mingw 20010917-1 =20 mingw-runtime 2.0-2 =20 mktemp 1.4-1 =20 nano 1.1.10-1 =20 ncurses 5.2-8 =20 newlib-man 20001118-1 =20 openssl 0.9.6e-1 =20 patch 2.5-3 =20 pcre 3.7-1 =20 perl 5.6.1-2 =20 popt 1.6.4-4 =20 python 2.2.1-1 =20 readline 4.3-1 =20 sed 3.02-1 =20 sh-utils 2.0-2 =20 sharutils 4.2.1-2 =20 tar 1.13.19-1 =20 tcltk 20001125-1 =20 tcsh 6.11.00-4 =20 termcap 20020403-1 =20 terminfo 5.2-3 =20 texinfo 4.2-3 =20 textutils 2.0.21-1 =20 tiff 3.5.7-1 =20 time 1.7-1 =20 units 1.77-1 =20 unzip 5.50-1 =20 vim 6.1-2 =20 w32api 1.5-1 =20 wget 1.8.2-1 =20 which 1.5-1 =20 zip 2.3-2 =20 zlib 1.1.4-1 =20 Use -h to see help about each section ------=_NextPart_000_0001_01C23A4C.546B7850 Content-Type: text/plain; charset=us-ascii -- Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple Bug reporting: http://cygwin.com/bugs.html Documentation: http://cygwin.com/docs.html FAQ: http://cygwin.com/faq/ ------=_NextPart_000_0001_01C23A4C.546B7850--