gmane.lisp.scheme.gauche

Gauche fails to build on FreeBSD/i386

Vitaly Magerya — 2012-05-23T13:24:14

Hi, folks. I'm trying to build Gauche 0.9.3.2 on FreeBSD, and while
it works fine on amd64 (e.g. passes all tests [1]), it fails on i386
either like this (full log at [2]):

../../src/gosh -ftest ../../src/precomp -e -P -o gauche--collection ../../libsrc/gauche/collection.scm
Deallocating excessively large block.  Too large an allocation?
*** Signal 6

Or prints many error messages like this:

../../src/gosh -ftest ../../src/recomp [..stuff..]
GC Warning: Out of Memory! Heap size: 4 MiB. Returning NULL!
out of memory (2693136576).  aborting...

... and then:

../src/gosh -q -I../src -I../lib -lgauche-init ./extract -en -o gauche-refe.texi ./gauche-ref.texi
gosh: "error": Compile Error: Compile Error: Compile Error: Compile Error: cannot find "util/match" in ("../lib" "../src" "/usr/local/share/gauche/site/lib" "/usr/local/share/gauche/0.9/lib")
"../lib/gauche/condutil.scm":36:(define-module gauche.condutil (use  ...
"../lib/gauche/regexp.scm":106:(define-condition-type <regexp-inval ...
"../lib/gauche/parseopt.scm":34:(define-module gauche.parseopt (use  ...
"././extract":16:(use gauche.parseopt)

I'm seeing this on all FreeBSD releases (e.g. see [3]), and I can
provide full logs, or any other information on request.

Note that Gauche 0.9.2 does not work on FreeBSD 9.0 at all: it
segfaults on startup inside GC_FreeBSDGetDataStart. This is a common
problem with old bdwgc releases on FreeBSD 9.0 -- which makes me
surprised to see that 0.9.3.2 actually works here at all.

So, any hints how to fix this? Do you do something differently on i386
and amd64?

[1] To be fair, it does hang on threading tests once in a while, and rfc.tls
    test needs modifications, since "ps -ef" in killgnutls.sh does not work
    witout procfs on FreeBSD.
[2] https://redports.org/~magv/20120523120023-6111-25736/gauche-0.9.3.2.log
[3] https://redports.org/buildarchive/20120523121835-81058/

------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/

test sometimes fails,maybe increase number of retries?

2012-05-23T11:07:26

Index: gauche-0.9.3.2/test/control.scm
===================================================================
--- gauche-0.9.3.2.orig/test/control.scm2012-03-20 10:07:45.000000000 +0100
+++ gauche-0.9.3.2/test/control.scm2012-05-23 12:57:09.299612417 +0200
< at >< at > -160,7 +160,7 < at >< at >
            (job-status (dequeue/wait! (thread-pool-results pool))))
     (test* "shutdown check" 'finished
            (let retry ([n 0])
-             (cond [(= n 10) #f]
+             (cond [(= n 1000) #f]
                    [(symbol? gate) gate]
                    [else (sys-nanosleep #e1e8) (retry (+ n 1))])))
     )

------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/

$ and .$

shuji yamamoto — 2012-05-12T23:00:40

Hi.
I testing $ macro.

gosh> ($ + $ quotient&remainder 22 4)
5
gosh> ((.$ + quotient&remainder) 22 4)
7

I thought $ is "compose" , but result is different.
I mean:
($ f a b $ g c d $) == (.$ (pa$ f a b ) (pa$ g c d) )

Shuji Yamamoto

------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/

Another follow-up release

Shiro Kawai — 2012-05-11T21:45:21

0.9.3 build fails if you specify sjis or eucjp to --enable-multibyte
configuration option.  The fixed version (0.9.3.2) is available now.

http://practical-scheme.net/gauche/index.html

If you compile utf-8 version, you probably don't need to update.

--shiro







------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/

Release 0.9.3

Shiro Kawai — 2012-05-10T07:21:39

Gauche 0.9.3 is released.
Two big changes are (1) lazy sequences/generators and
(2) Windows native thread support.

Detailes release notes are on the webpage:
http://practical-scheme.net/gauche/index.html

For the next release, I aim at adding features for R7RS.

--shiro


------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/

some more makefile.in fixes for out of tree build

2012-02-11T12:52:52

diff --git a/doc/Makefile.in b/doc/Makefile.in
index 9b3408e..ddd198a 100644
--- a/doc/Makefile.in
+++ b/doc/Makefile.in
< at >< at > -113,10 +113,10 < at >< at > gauche-refe.info.gz : gauche-refe.texi
 fi
 
 gauche-refj.html : gauche-refj.texi
-texi2html --init-file=ja-init.pl --number gauche-refj.texi
+texi2html --init-file=$(srcdir)/ja-init.pl --number gauche-refj.texi
 
 gauche-refj_toc.html : gauche-refj.texi
-texi2html --init-file=ja-init.pl --split section --number gauche-refj.texi
+texi2html --init-file=$(srcdir)/ja-init.pl --split section --number gauche-refj.texi
 for f in gauche-refj*.html; do \
   sed 's/^<body lang="en"/<body lang="ja"/' $$f > $$f.t && mv $$f.t $$f; \
 done

------------------------------------------------------------------------------
Virtualization & Cloud Management Using Capacity Planning
Cloud computing makes use of virtualization - but cloud computing 
also focuses on allowing computing to be delivered as a service.
http://www.accelacomm.com/jaw/sfnl/114/51521223/

typo in makefile.in

2012-02-11T12:39:06

diff --git a/doc/Makefile.in b/doc/Makefile.in
index 9b3408e..eccdb5b 100644
--- a/doc/Makefile.in
+++ b/doc/Makefile.in
< at >< at > -138,7 +138,7 < at >< at > gauche-refj.info.gz : gauche-refj.texi
 fi
 
 gauche-deve.texi : gauche-dev.texi extract
-$(GOSH) $(extract)/extract -en -o gauche-deve.texi gauche-dev.texi
+$(GOSH) $(srcdir)/extract -en -o gauche-deve.texi gauche-dev.texi
 
 gauche-deve.html : gauche-deve.texi
 texi2html --number gauche-deve.texi

------------------------------------------------------------------------------
Virtualization & Cloud Management Using Capacity Planning
Cloud computing makes use of virtualization - but cloud computing 
also focuses on allowing computing to be delivered as a service.
http://www.accelacomm.com/jaw/sfnl/114/51521223/

stream question / unbound memory?

2012-01-26T10:33:50

Hi,

why does the following example seem to need unbound memory?

sh$ { cat << EOF
#!/bin/sh
#|
GC_PRINT_STATS=1
export GC_PRINT_STATS
exec gosh -- "\$0" "\$< at >"
|#

(use util.stream)

(define (main args)
  (stream-for-each (lambda(x)
                     (write x)
                     (newline))
                   (port->stream (current-input-port) read))
  0)
EOF
} > test.scm \
&& chmod +x test.scm \
&& seq 10000000\
|./test.scm 2>&1 > /dev/null \
| grep --line-buffered heapsize |cut -f 2 -d ">"

output should be something like:
heapsize = 262144 bytes
heapsize = 786432 bytes
heapsize = 2502656 bytes
heapsize = 3338240 bytes
[...]
heapsize = 44535808 bytes
heapsize = 44535808 bytes
heapsize = 59383808 bytes

greetings,
karme

------------------------------------------------------------------------------
Keep Your Developer Skills Current with LearnDevNow!
The most comprehensive online learning library for Microsoft developers
is just $99.99! Visual Studio, SharePoint, SQL - plus HTML5, CSS3, MVC3,
Metro Style Apps, more. Free future releases when you subscribe now!
http://p.sf.net/sfu/learndevnow-d2d

Thinking again about parameters in the VM

Kirill Zorin — 2012-01-14T03:52:51

"[An] error happens when a parameter is created *after* some
threads are already running, and the parameter is used
in those threads that were already running.  One possible
scenario is like this:

- We have thread A and thread B running.
- Thread A calls (use rfc.http) for the first time.
 This loads http.scm and creates parameters.
 Thread B isn't aware of those parameters.
- Thread B *dynamically* loads some file, say, foo.scm,
 which contains (use rfc.http).  This time http.scm has
 already been loaded, so it's no-op.
- Thread B calls some function defined in foo.scm,
 which in turn makes http call.  The call accesses
 parameters defined in http.scm, but they are not
 visible from B, hence the error.

This won't happen typically, since usually the modules
used by the program is statically stated in `use' form;
so when a thread starts running, all the necessary parameters
are already created.

However, if a module is dynamically loaded (via explicitly
by 'load', or implicitly by autoload), the above scenario
can happen.

[...]

The parameter system is awkward anyway, so I need some
fundamental fix for this."


Transferring this here to get more thoughts and have some kind of information trail.

------------------------------------------------------------------------------
RSA(R) Conference 2012
Mar 27 - Feb 2
Save $400 by Jan. 27
Register now!
http://p.sf.net/sfu/rsa-sfdev2dev2

copy-bit-field buggy?

Sascha Ziemann — 2012-01-12T13:10:57

The function copy-bit-field from srfi-60 seems to be buggy.

This is what SCM does:

"1111"
"111"

And this is what Gauche does:
$ gosh -u srfi-60
gosh> (number->string (copy-bit-field #b1000 -1 0 3) 2)
"1000"
gosh> (number->string (copy-bit-field #b0000 -1 0 3) 2)
"0"

------------------------------------------------------------------------------
RSA(R) Conference 2012
Mar 27 - Feb 2
Save $400 by Jan. 27
Register now!
http://p.sf.net/sfu/rsa-sfdev2dev2

(integer->char -1)

Sascha Ziemann — 2012-01-10T14:13:17

The function integer->char does funny things for -1. This is the
output on my system:

$ gosh
gosh> (integer->char -1)
#\������
gosh>

Is this intended?

------------------------------------------------------------------------------
Write once. Port to many.
Get the SDK and tools to simplify cross-platform app development. Create 
new or port existing apps to sell to consumers worldwide. Explore the 
Intel AppUpSM program developer opportunity. appdeveloper.intel.com/join
http://p.sf.net/sfu/intel-appdev
_______________________________________________
Gauche-devel mailing list
Gauche-devel< at >lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gauche-devel

DBI example

2011-12-22T09:04:02

First: is this the right mailing list for user questions?

If so:

I tried the DBI example from the reference documentation and get the
following error:

*** ERROR: list required, but got #<<mysql-result-set> 0x9b69fa0>

After some further reading I found the collection framework.

For newbies like me it would be useful to add the use statements at
the top of the example:

(use dbi)
(use gauche.collection)

------------------------------------------------------------------------------
Write once. Port to many.
Get the SDK and tools to simplify cross-platform app development. Create 
new or port existing apps to sell to consumers worldwide. Explore the 
Intel AppUpSM program developer opportunity. appdeveloper.intel.com/join
http://p.sf.net/sfu/intel-appdev

unchecked FD_SETSIZE in fdset operations

Tomas Stanek — 2011-12-20T19:16:00

Hi,

code in libsys.scm and port.c uses FD_SET, FD_ISSET and friends on 
fdset. It however doesn't check if the descriptor in question is 
smaller then FD_SETSIZE. This in my case results in a segfault of 
the interpreter. I'm not including the fixing patch because the fix 
is rather trivial.

Best regards,
Tomas Stanek

------------------------------------------------------------------------------
Write once. Port to many.
Get the SDK and tools to simplify cross-platform app development. Create 
new or port existing apps to sell to consumers worldwide. Explore the 
Intel AppUpSM program developer opportunity. appdeveloper.intel.com/join
http://p.sf.net/sfu/intel-appdev

calling (cgen-precompile scm-file :ext-initializer#t) multiple times

2011-11-06T16:21:58

Hi,

using gauche < 0.9.2 i could call
(cgen-precompile scm-file :ext-initializer #t)
multiple times in a row getting expected output

testing with 0.9.2 i found it somehow kept some state (list of modules)

i am not sure wether this is a bug or a feature

as workaround at the moment i use: (maybe shortest explanation to
understand my problem)

;; hackish workaround for bug? in gauche 0.9.2
(when (not (null? (all-tmodules)))
   (class-slot-set! (with-module gauche.cgen.precomp (current-tmodule-class))
                                 'modules
                                 (list)))
(cgen-precompile scm-file :ext-initializer #t)

greetings
karme

------------------------------------------------------------------------------
RSA(R) Conference 2012
Save $700 by Nov 18
Register now
http://p.sf.net/sfu/rsa-sfdev2dev1

FreeBSD ports upgrade to 0.9.2 patch

KISHIMOTO, Makoto — 2011-09-25T22:26:01

Hello, everyone. My name is Makoto Kishimoto.

FreeBSD ports of Gauche is still 0.9, I sent PR already
( http://www.freebsd.org/cgi/query-pr.cgi?pr=160927 ) .

Attached file is patch for upgrade to 0.9.2 . Anyone who use FreeBSD,
please test the patch and comment.

Thank you.
diff -ru ../gauche-0.9/Makefile ./Makefile
--- ../gauche-0.9/Makefile2011-09-25 08:26:46.000000000 +0900
+++ ./Makefile2011-09-25 22:46:52.000000000 +0900
< at >< at > -6,7 +6,7 < at >< at >
 #
 
 PORTNAME=gauche
-PORTVERSION=0.9# Keep databases/gauche-gdbm in sync with this
+PORTVERSION=0.9.2# Keep databases/gauche-gdbm in sync with this
 CATEGORIES=lang scheme
 MASTER_SITES=SF/${PORTNAME}/Gauche/
 DISTNAME=Gauche-${PORTVERSION}
< at >< at > -48,6 +48,8 < at >< at >
 INFO=gauche-refe gauche-refj
 .endif
 
+DATADIR=${PREFIX}/share/${PORTNAME}-0.9
+
 .include <bsd.port.pre.mk>
 
 .if (${ARCH} == "ia64") || (${ARCH} == "sparc64")
< at >< at > -65,12 +67,12 < at >< at >
 
 post-install:
 ${STRIP_CMD} ${PREFIX}/bin/gosh
-${RM} -f ${PREFIX}/share/gauche/${PORTVERSION}/lib/slibcat
-${MKDIR} ${PREFIX}/share/gauche/site/lib/.packages
-${TOUCH} ${PREFIX}/share/gauche/site/lib/.packages/.keepme
-${TOUCH} ${PREFIX}/lib/gauche/site/${PORTVERSION}/${CONFIGURE_TARGET}/.keepme
-${MKDIR} ${PREFIX}/share/gauche/${PORTVERSION}/lib/.packages
-${TOUCH} ${PREFIX}/share/gauche/${PORTVERSION}/lib/.packages/.keepme
+${RM} -f ${PREFIX}/share/gauche-0.9/${PORTVERSION}/lib/slibcat
+${MKDIR} ${PREFIX}/share/gauche-0.9/site/lib/.packages
+${TOUCH} ${PREFIX}/share/gauche-0.9/site/lib/.packages/.keepme
+${TOUCH} ${PREFIX}/lib/gauche-0.9/site/${CONFIGURE_TARGET}/.keepme
+${MKDIR} ${PREFIX}/share/gauche-0.9/${PORTVERSION}/lib/.packages
+${TOUCH} ${PREFIX}/share/gauche-0.9/${PORTVERSION}/lib/.packages/.keepme
 ${MKDIR} ${DOCSDIR}
 ${TOUCH} ${DOCSDIR}/.keepme
 ${MKDIR} ${EXAMPLESDIR}
diff -ru ../gauche-0.9/distinfo ./distinfo
--- ../gauche-0.9/distinfo2011-09-25 08:26:46.000000000 +0900
+++ ./distinfo2011-09-25 08:30:48.000000000 +0900
< at >< at > -1,2 +1,2 < at >< at >
-SHA256 (Gauche-0.9.tgz) = 9faa8e79d83152599e945380e874718642d25657803432b5c826a7d3711c9250
-SIZE (Gauche-0.9.tgz) = 3938498
+SHA256 (Gauche-0.9.2.tgz) = 16c9dfc9fa3f556f75d13e9b5a701f95e9f7749379e6d007a3a6dc561a625736
+SIZE (Gauche-0.9.2.tgz) = 4452767
diff -ru ../gauche-0.9/pkg-plist ./pkg-plist
--- ../gauche-0.9/pkg-plist2011-09-25 08:26:46.000000000 +0900
+++ ./pkg-plist2011-09-26 06:30:19.000000000 +0900
< at >< at > -5,118 +5,130 < at >< at >
 bin/gauche-install
 bin/gauche-package
 bin/gosh
-lib/gauche/%%VERSION%%/%%TARGET%%/binary--io.so
-lib/gauche/%%VERSION%%/%%TARGET%%/dbm--ndbm.so
-lib/gauche/%%VERSION%%/%%TARGET%%/file--util.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--auxsys.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--charconv.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--collection.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--fcntl.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--hook.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--net.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--parameter.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--sequence.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--syslog.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--termios.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--threads.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche--vport.so
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche-cesconv
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche-config
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche-install
-lib/gauche/%%VERSION%%/%%TARGET%%/gauche-package
-lib/gauche/%%VERSION%%/%%TARGET%%/gosh
-lib/gauche/%%VERSION%%/%%TARGET%%/libgauche-uvector.so
-lib/gauche/%%VERSION%%/%%TARGET%%/libgauche.so
-lib/gauche/%%VERSION%%/%%TARGET%%/math--mt-random.so
-lib/gauche/%%VERSION%%/%%TARGET%%/rfc--md5.so
-lib/gauche/%%VERSION%%/%%TARGET%%/rfc--sha.so
-lib/gauche/%%VERSION%%/%%TARGET%%/rfc--zlib.so
-lib/gauche/%%VERSION%%/%%TARGET%%/srfi-1.so
-lib/gauche/%%VERSION%%/%%TARGET%%/srfi-13.so
-lib/gauche/%%VERSION%%/%%TARGET%%/srfi-19.so
-lib/gauche/%%VERSION%%/%%TARGET%%/srfi-43.so
-lib/gauche/%%VERSION%%/%%TARGET%%/sxml--serializer.so
-lib/gauche/%%VERSION%%/%%TARGET%%/sxml--ssax.so
-lib/gauche/%%VERSION%%/%%TARGET%%/sxml--sxpath.so
-lib/gauche/%%VERSION%%/%%TARGET%%/sxml--tools.so
-lib/gauche/%%VERSION%%/%%TARGET%%/text--gettext.so
-lib/gauche/%%VERSION%%/%%TARGET%%/text--tr.so
-lib/gauche/%%VERSION%%/%%TARGET%%/util--match.so
-lib/gauche/%%VERSION%%/%%TARGET%%/util--sparse.so
-lib/gauche/%%VERSION%%/include/gauche.h
-lib/gauche/%%VERSION%%/include/gauche/arch.h
-lib/gauche/%%VERSION%%/include/gauche/bignum.h
-lib/gauche/%%VERSION%%/include/gauche/bits.h
-lib/gauche/%%VERSION%%/include/gauche/bits_inline.h
-lib/gauche/%%VERSION%%/include/gauche/builtin-syms.h
-lib/gauche/%%VERSION%%/include/gauche/char_euc_jp.h
-lib/gauche/%%VERSION%%/include/gauche/char_none.h
-lib/gauche/%%VERSION%%/include/gauche/char_sjis.h
-lib/gauche/%%VERSION%%/include/gauche/char_utf_8.h
-lib/gauche/%%VERSION%%/include/gauche/charset.h
-lib/gauche/%%VERSION%%/include/gauche/class.h
-lib/gauche/%%VERSION%%/include/gauche/code.h
-lib/gauche/%%VERSION%%/include/gauche/collection.h
-lib/gauche/%%VERSION%%/include/gauche/config.h
-lib/gauche/%%VERSION%%/include/gauche/exception.h
-lib/gauche/%%VERSION%%/include/gauche/extend.h
-lib/gauche/%%VERSION%%/include/gauche/extern.h
-lib/gauche/%%VERSION%%/include/gauche/float.h
-lib/gauche/%%VERSION%%/include/gauche/gloc.h
-lib/gauche/%%VERSION%%/include/gauche/hash.h
-lib/gauche/%%VERSION%%/include/gauche/int64.h
-lib/gauche/%%VERSION%%/include/gauche/keyword.h
-lib/gauche/%%VERSION%%/include/gauche/load.h
-lib/gauche/%%VERSION%%/include/gauche/macro.h
-lib/gauche/%%VERSION%%/include/gauche/module.h
-lib/gauche/%%VERSION%%/include/gauche/number.h
-lib/gauche/%%VERSION%%/include/gauche/parameter.h
-lib/gauche/%%VERSION%%/include/gauche/paths.h
-lib/gauche/%%VERSION%%/include/gauche/port.h
-lib/gauche/%%VERSION%%/include/gauche/prof.h
-lib/gauche/%%VERSION%%/include/gauche/pthread.h
-lib/gauche/%%VERSION%%/include/gauche/reader.h
-lib/gauche/%%VERSION%%/include/gauche/regexp.h
-lib/gauche/%%VERSION%%/include/gauche/scmconst.h
-lib/gauche/%%VERSION%%/include/gauche/string.h
-lib/gauche/%%VERSION%%/include/gauche/symbol.h
-lib/gauche/%%VERSION%%/include/gauche/system.h
-lib/gauche/%%VERSION%%/include/gauche/treemap.h
-lib/gauche/%%VERSION%%/include/gauche/uthread.h
-lib/gauche/%%VERSION%%/include/gauche/uvector.h
-lib/gauche/%%VERSION%%/include/gauche/vector.h
-lib/gauche/%%VERSION%%/include/gauche/vm.h
-lib/gauche/%%VERSION%%/include/gauche/vminsn.h
-lib/gauche/%%VERSION%%/include/gauche/weak.h
-lib/gauche/%%VERSION%%/include/gauche/win-compat.h
-lib/gauche/%%VERSION%%/include/gc.h
-lib/gauche/%%VERSION%%/include/gc_allocator.h
-lib/gauche/%%VERSION%%/include/gc_config_macros.h
-lib/gauche/%%VERSION%%/include/gc_cpp.h
-lib/gauche/%%VERSION%%/include/gc_inline.h
-lib/gauche/%%VERSION%%/include/gc_mark.h
-lib/gauche/%%VERSION%%/include/gc_pthread_redirects.h
-lib/gauche/%%VERSION%%/include/gc_tiny_fl.h
-lib/gauche/%%VERSION%%/include/gc_typed.h
-lib/gauche/%%VERSION%%/include/gc_version.h
-lib/gauche/site/%%VERSION%%/%%TARGET%%/.keepme
-lib/libgauche.so
-lib/libgauche.so.0
-lib/libgauche.so.%%VERSION%%.0
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/binary--io.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/crypt--bcrypt.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/dbm--ndbm.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/file--util.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--auxsys.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--charconv.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--collection.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--fcntl.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--hook.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--net.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--parameter.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--sequence.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--syslog.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--termios.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--threads.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche--vport.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche-cesconv
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche-config
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche-install
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gauche-package
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/gosh
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/libgauche-0.9.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/libgauche-uvector.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/math--mt-random.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/os--windows.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/parser--peg.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/rfc--md5.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/rfc--sha.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/rfc--zlib.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/srfi-1.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/srfi-13.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/srfi-19.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/srfi-43.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/sxml--serializer.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/sxml--ssax.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/sxml--sxpath.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/sxml--tools.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/text--gettext.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/text--tr.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/text--unicode.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/util--match.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/util--queue.so
+lib/gauche-0.9/%%VERSION%%/%%TARGET%%/util--sparse.so
+lib/gauche-0.9/%%VERSION%%/include/gauche.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/arch.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/bignum.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/bits.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/bits_inline.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/builtin-syms.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/bytes_inline.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/char_euc_jp.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/char_none.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/char_sjis.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/char_utf_8.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/charset.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/class.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/code.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/collection.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/config.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/exception.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/extend.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/extern.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/float.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/gloc.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/hash.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/int64.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/keyword.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/load.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/macro.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/module.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/number.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/parameter.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/paths.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/port.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/prof.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/pthread.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/reader.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/regexp.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/scmconst.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/string.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/symbol.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/system.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/treemap.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/uthread.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/uvector.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/vector.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/vm.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/vminsn.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/weak.h
+lib/gauche-0.9/%%VERSION%%/include/gauche/win-compat.h
+lib/gauche-0.9/%%VERSION%%/include/gc.h
+lib/gauche-0.9/%%VERSION%%/include/gc_allocator.h
+lib/gauche-0.9/%%VERSION%%/include/gc_config_macros.h
+lib/gauche-0.9/%%VERSION%%/include/gc_cpp.h
+lib/gauche-0.9/%%VERSION%%/include/gc_inline.h
+lib/gauche-0.9/%%VERSION%%/include/gc_mark.h
+lib/gauche-0.9/%%VERSION%%/include/gc_pthread_redirects.h
+lib/gauche-0.9/%%VERSION%%/include/gc_tiny_fl.h
+lib/gauche-0.9/%%VERSION%%/include/gc_typed.h
+lib/gauche-0.9/%%VERSION%%/include/gc_version.h
+lib/gauche-0.9/site/%%TARGET%%/.keepme
+lib/libgauche-0.9.so
+lib/libgauche-0.9.so.0
+lib/libgauche-0.9.so.0.2
 share/aclocal/gauche.m4
 %%DATADIR%%/%%VERSION%%/aclocal.m4
 %%DATADIR%%/%%VERSION%%/lib/.packages/.keepme
+%%DATADIR%%/%%VERSION%%/lib/binary/ftype.scm
 %%DATADIR%%/%%VERSION%%/lib/binary/io.scm
 %%DATADIR%%/%%VERSION%%/lib/binary/pack.scm
 %%DATADIR%%/%%VERSION%%/lib/cesconv
 %%DATADIR%%/%%VERSION%%/lib/compat/jfilter.scm
 %%DATADIR%%/%%VERSION%%/lib/compat/norational.scm
 %%DATADIR%%/%%VERSION%%/lib/compat/stk.scm
+%%DATADIR%%/%%VERSION%%/lib/control/job.scm
+%%DATADIR%%/%%VERSION%%/lib/control/thread-pool.scm
+%%DATADIR%%/%%VERSION%%/lib/crypt/bcrypt.scm
 %%DATADIR%%/%%VERSION%%/lib/dbd/null.scm
 %%DATADIR%%/%%VERSION%%/lib/dbi.scm
 %%DATADIR%%/%%VERSION%%/lib/dbm.scm
+%%DATADIR%%/%%VERSION%%/lib/dbm/dump
 %%DATADIR%%/%%VERSION%%/lib/dbm/fsdbm.scm
 %%DATADIR%%/%%VERSION%%/lib/dbm/ndbm.scm
+%%DATADIR%%/%%VERSION%%/lib/dbm/restore
 %%DATADIR%%/%%VERSION%%/lib/file/filter.scm
 %%DATADIR%%/%%VERSION%%/lib/file/util.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche-init.scm
< at >< at > -124,10 +136,10 < at >< at >
 %%DATADIR%%/%%VERSION%%/lib/gauche/auxsys.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/cgen.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/cgen/cise.scm
-%%DATADIR%%/%%VERSION%%/lib/gauche/cgen/literal-uv.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/cgen/literal.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/cgen/precomp.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/cgen/stub.scm
+%%DATADIR%%/%%VERSION%%/lib/gauche/cgen/tmodule.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/cgen/type.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/cgen/unit.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/charconv.scm
< at >< at > -142,6 +154,7 < at >< at >
 %%DATADIR%%/%%VERSION%%/lib/gauche/experimental/ref.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/fcntl.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/fileutil.scm
+%%DATADIR%%/%%VERSION%%/lib/gauche/generator.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/hashutil.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/hook.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/interactive.scm
< at >< at > -168,9 +181,11 < at >< at >
 %%DATADIR%%/%%VERSION%%/lib/gauche/package/util.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/parameter.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/parseopt.scm
+%%DATADIR%%/%%VERSION%%/lib/gauche/partcont.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/portutil.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/procedure.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/process.scm
+%%DATADIR%%/%%VERSION%%/lib/gauche/record.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/redefutil.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/regexp.scm
 %%DATADIR%%/%%VERSION%%/lib/gauche/reload.scm
< at >< at > -200,6 +215,8 < at >< at >
 %%DATADIR%%/%%VERSION%%/lib/genstub
 %%DATADIR%%/%%VERSION%%/lib/math/const.scm
 %%DATADIR%%/%%VERSION%%/lib/math/mt-random.scm
+%%DATADIR%%/%%VERSION%%/lib/os/windows.scm
+%%DATADIR%%/%%VERSION%%/lib/parser/peg.scm
 %%DATADIR%%/%%VERSION%%/lib/precomp
 %%DATADIR%%/%%VERSION%%/lib/rfc/822.scm
 %%DATADIR%%/%%VERSION%%/lib/rfc/base64.scm
< at >< at > -209,6 +226,7 < at >< at >
 %%DATADIR%%/%%VERSION%%/lib/rfc/http.scm
 %%DATADIR%%/%%VERSION%%/lib/rfc/icmp.scm
 %%DATADIR%%/%%VERSION%%/lib/rfc/ip.scm
+%%DATADIR%%/%%VERSION%%/lib/rfc/json.scm
 %%DATADIR%%/%%VERSION%%/lib/rfc/md5.scm
 %%DATADIR%%/%%VERSION%%/lib/rfc/mime.scm
 %%DATADIR%%/%%VERSION%%/lib/rfc/quoted-printable.scm
< at >< at > -237,8 +255,10 < at >< at >
 %%DATADIR%%/%%VERSION%%/lib/srfi-43.scm
 %%DATADIR%%/%%VERSION%%/lib/srfi-5.scm
 %%DATADIR%%/%%VERSION%%/lib/srfi-55.scm
+%%DATADIR%%/%%VERSION%%/lib/srfi-60.scm
 %%DATADIR%%/%%VERSION%%/lib/srfi-7.scm
 %%DATADIR%%/%%VERSION%%/lib/srfi-9.scm
+%%DATADIR%%/%%VERSION%%/lib/srfi-98.scm
 %%DATADIR%%/%%VERSION%%/lib/sxml/adaptor.scm
 %%DATADIR%%/%%VERSION%%/lib/sxml/serializer.scm
 %%DATADIR%%/%%VERSION%%/lib/sxml/ssax.scm
< at >< at > -256,6 +276,7 < at >< at >
 %%DATADIR%%/%%VERSION%%/lib/text/sql.scm
 %%DATADIR%%/%%VERSION%%/lib/text/tr.scm
 %%DATADIR%%/%%VERSION%%/lib/text/tree.scm
+%%DATADIR%%/%%VERSION%%/lib/text/unicode.scm
 %%DATADIR%%/%%VERSION%%/lib/util/combinations.scm
 %%DATADIR%%/%%VERSION%%/lib/util/digest.scm
 %%DATADIR%%/%%VERSION%%/lib/util/isomorph.scm
< at >< at > -294,6 +315,8 < at >< at >
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/srfi-29
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/srfi-14
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/rfc
+< at >dirrm %%DATADIR%%/%%VERSION%%/lib/parser
+< at >dirrm %%DATADIR%%/%%VERSION%%/lib/os
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/math
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/gauche/vm
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/gauche/serializer
< at >< at > -306,19 +329,20 < at >< at >
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/file
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/dbm
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/dbd
+< at >dirrm %%DATADIR%%/%%VERSION%%/lib/crypt
+< at >dirrm %%DATADIR%%/%%VERSION%%/lib/control
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/compat
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/binary
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib/.packages
 < at >dirrm %%DATADIR%%/%%VERSION%%/lib
 < at >dirrm %%DATADIR%%/%%VERSION%%
 < at >dirrm %%DATADIR%%
-< at >dirrm lib/gauche/site/%%VERSION%%/%%TARGET%%
-< at >dirrm lib/gauche/site/%%VERSION%%
-< at >dirrm lib/gauche/site
-< at >dirrm lib/gauche/%%VERSION%%/include/gauche
-< at >dirrm lib/gauche/%%VERSION%%/include
-< at >dirrm lib/gauche/%%VERSION%%/%%TARGET%%
-< at >dirrm lib/gauche/%%VERSION%%
-< at >dirrm lib/gauche
+< at >dirrm lib/gauche-0.9/site/%%TARGET%%
+< at >dirrm lib/gauche-0.9/site
+< at >dirrm lib/gauche-0.9/%%VERSION%%/include/gauche
+< at >dirrm lib/gauche-0.9/%%VERSION%%/include
+< at >dirrm lib/gauche-0.9/%%VERSION%%/%%TARGET%%
+< at >dirrm lib/gauche-0.9/%%VERSION%%
+< at >dirrm lib/gauche-0.9
 < at >dirrm %%DOCSDIR%%
 < at >dirrm %%EXAMPLESDIR%%
------------------------------------------------------------------------------
All of the data generated in your IT infrastructure is seriously valuable.
Why? It contains a definitive record of application performance, security
threats, fraudulent activity, and more. Splunk takes this data and makes
sense of it. IT sense. And common sense.
http://p.sf.net/sfu/splunk-d2dcopy2_______________________________________________
Gauche-devel mailing list
Gauche-devel< at >lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gauche-devel

sxpath union operator '|'

Jens Thiele — 2011-09-18T10:54:55

Hi,

looks like the sxpath union operator '|' doesn't work?

karme< at >amalthea:~/Downloads/scheme/gauche/git/Gauche/src$ ./gosh -ftest
gosh> (use sxml.sxpath)
#<undef>
gosh> ((sxpath "r/a/text()|r/b/text()") '(*TOP* (r (a "hello") (b "world"))))

XPointer parser error: unexpected - "|r/b/text()"
*** ERROR: invalid application: (#f (*TOP* (r (a "hello") (b "world"))))
Stack Trace:
_______________________________________


but txpath.scm has some code to support it?
txpath.scm:
; Parses a UnionExpr production ([18] in XPath specification)
; [18]    UnionExpr    ::=    PathExpr  
;                             | UnionExpr '|' PathExpr
(define (sxml:parse-union-expr path ns-binding)
...

my try on a unit test:

diff --git a/ext/sxml/test.scm b/ext/sxml/test.scm
index b9a39bb..57f8b8c 100644
--- a/ext/sxml/test.scm
+++ b/ext/sxml/test.scm
< at >< at > -23,6 +23,13 < at >< at >
   (test* "ns-trans" '((rss:title "foo"))
          ((sxpath "//my:title" ns-alist) sxml)))
 
+;; test for union operator '|'
+;; compare to:
+;; echo '<r><a>hello</a><b>world</b></r>'|xmlstarlet sel -t -c "r/a/text()|r/b/text()"
+(let ((sxml '(*TOP* (r (a "hello") (b "world")))))
+  (test* "union operator" '("hello" "world")
+         ((sxpath "r/a/text()|r/b/text()") sxml)))
+
 (test-end)
 
 ;; sxml.serializer test

make check:
[...]
Testing sxpath ...                                               
XPointer parser error: unexpected - "|r/b/text()"
failed.
[...]

jens

------------------------------------------------------------------------------
BlackBerry&reg; DevCon Americas, Oct. 18-20, San Francisco, CA
http://p.sf.net/sfu/rim-devcon-copy2

0.9.2 is out

Shiro Kawai — 2011-08-06T13:24:20

Gauche 0.9.2 is released.  Check out the homepage for release notes.

http://practical-scheme.net/gauche/

I thought I made lots of changes, but overall, this is rather
a minor enhancement release with lots of small bug fixes.

One notable improvement is that we switched from NSIS to WiX 
to create Windows installer.  NSIS version was *.exe file
and some heuristic virus checker misidentifies it as a trojan
horse.  It also had a problem that it could smash the value of
PATH if it was too long.  I hope those issues are gone with
this new package.

Gauche-gl is also updated, for it fails to compile with 0.9.2.
Its feature hasn't been changed.

--shiro



------------------------------------------------------------------------------
BlackBerry&reg; DevCon Americas, Oct. 18-20, San Francisco, CA
The must-attend event for mobile developers. Connect with experts. 
Get tools for creating Super Apps. See the latest technologies.
Sessions, hands-on labs, demos & much more. Register early & save!
http://p.sf.net/sfu/rim-blackberry-1

patch to add sys-clearenv and httponly

2011-07-08T06:24:15

Here is a simple patch to add sys-clearenv to quickly clear environment
variables and to add httponly to the cookie constructor.  The patch is
against 0.9.1:

diff --git a/ext/auxsys/auxsys.c b/ext/auxsys/auxsys.c
index 663db43..4793a5b 100644
--- a/ext/auxsys/auxsys.c
+++ b/ext/auxsys/auxsys.c
< at >< at > -134,6 +134,39 < at >< at > ScmObj Scm_Environ(void)
 #endif /*GAUCHE_WINDOWS*/
 }

+#if !defined(HAVE_CLEARENV)
+/*
+ * Grabbed code from
+ *
+ * https://www.securecoding.cert.org/confluence/display/seccode/ \
+ * ENV03-C.+Sanitize+the+environment+when+invoking+external+programs
+ *
+ * and modified it to remove the static local variables.
+ *
+ */
+int clearenv(void) {
+  char *namebuf = NULL;
+
+  while (environ != NULL && environ[0] != NULL) {
+    size_t len = strcspn(environ[0], "=");

+    if (len == 0) {
+      return -1;
+    }
+    namebuf = (char *)malloc(len + 1);
+    if (namebuf == NULL) {
+      return -1;
+    }
+    memcpy(namebuf, environ[0], len);
+    namebuf[len] = '\0';
+    if (unsetenv(namebuf) == -1) {
+      return -1;
+    }
+    free(namebuf);
+  }
+  return 0;
+}
+#endif /* HAVE_CLEARENV */
+
 /*==============================================================
  * Emulation stuff for Windows
  */
diff --git a/ext/auxsys/auxsys.scm b/ext/auxsys/auxsys.scm
index 4c944bd..e2465ad 100644

--- a/ext/auxsys/auxsys.scm
+++ b/ext/auxsys/auxsys.scm
< at >< at > -39,7 +39,7 < at >< at >
           sys-setsid sys-setuid sys-times sys-uname sys-ctermid
           sys-gethostname sys-getdomainname
           sys-putenv sys-setenv sys-unsetenv sys-environ sys-environ->alist
-          sys-utime
+          sys-utime sys-clearenv
           sys-getgroups sys-getlogin sys-localeconv
           sys-getloadavg)
   )
diff --git a/ext/auxsys/auxsysconf.h.in b/ext/auxsys/auxsysconf.h.in
index ddecdb7..cec7669 100644
--- a/ext/auxsys/auxsysconf.h.in
+++ b/ext/auxsys/auxsysconf.h.in
< at >< at > -13,6 +13,9 < at >< at >
 /* Define to 1 if the system has putenv */
 #undef HAVE_PUTENV

+/* Define to 1 if the system has clearenv */
+#undef HAVE_CLEARENV
+
 /* Define to 1 if the systen has getpgid */

 #undef HAVE_GETPGID

diff --git a/ext/auxsys/auxsyslib.stub b/ext/auxsys/auxsyslib.stub
index c8cd4f0..af98242 100644
--- a/ext/auxsys/auxsyslib.stub
+++ b/ext/auxsys/auxsyslib.stub
< at >< at > -111,6 +111,11 < at >< at > extern ScmObj Scm_Environ(void);
   (initcode "Scm_AddFeature(\"gauche.sys.getloadavg\", NULL);")
   )

+;; clearenv
+(define-cproc sys-clearenv () ::<int>
+  (SCM_SYSCALL SCM_RESULT (clearenv))
+  (when (< SCM_RESULT 0) (Scm_SysError "clearenv failed")))
+
 ;; sys/stat.h
 (if "!defined(GAUCHE_WINDOWS)"
 (define-cproc sys-mkfifo (path::<const-cstring> mode::<int>) ::<int>
diff --git a/lib/rfc/cookie.scm b/lib/rfc/cookie.scm
index fefeef8..cf7f744 100644
--- a/lib/rfc/cookie.scm
+++ b/lib/rfc/cookie.scm
< at >< at > -158,7 +158,7 < at >< at >

 ;; specs is the following format.
 ;;
 ;;   ((<name> <value> [:comment <comment>] [:comment-url <comment-url>]
-;;                    [:discard <bool>] [:domain <domain>]
+;;                    [:discard <bool>] [:domain <domain>] [:httponly
<bool>]
 ;;                    [:max-age <age>] [:path <value>] [:port <port-list>]
 ;;                    [:secure <bool>] [:version <version>] [:expires
<date>]
 ;;    ) ...)
< at >< at > -214,6 +214,8 < at >< at >
           (ignore)))
        ((eqv? :secure (car attr))
         (if (cadr attr) (next "Secure") (ignore)))
+       ((eqv? :httponly (car attr))
+        (if (cadr attr) (next "HttpOnly") (ignore)))
        ((eqv? :version (car attr))
         (if (> ver 0)
           (next (format #f "Version=~a" (cadr attr)))
diff --git a/src/autoloads.scm b/src/autoloads.scm
index 41c05f8..fa89f40 100644
--- a/src/autoloads.scm
+++ b/src/autoloads.scm
< at >< at > -149,7 +149,7 < at >< at >
           sys-setsid sys-setuid sys-times sys-uname sys-ctermid

           sys-gethostname sys-getdomainname
           sys-putenv sys-setenv sys-unsetenv sys-environ sys-environ->alist
-          sys-utime
+          sys-utime sys-clearenv
           sys-getgroups sys-getlogin sys-localeconv
           sys-getloadavg)


EOF



------------------------------------------------------------------------------
All of the data generated in your IT infrastructure is seriously valuable.
Why? It contains a definitive record of application performance, security 
threats, fraudulent activity, and more. Splunk takes this data and makes 
sense of it. IT sense. And common sense.
http://p.sf.net/sfu/splunk-d2d-c2

Is 'read' a security problem?

Lasse Kliemann — 2011-07-03T10:19:39

A client sends commands to a server as a series of s-expressions. 
The server uses 'read' to collect them. Is that already a security
problem?

The server does *not* use 'eval' but dissects the read 
expressions by itself. So that should not be a problem, as long 
as I do not make a mistake.

But what about special syntax, like sharp syntax? I have come so 
far to realize that I can introduce potentially dangerous 
elements using 'define-reader-ctor', so I will avoid that.

Am I on the safe side then?

If not, is there a kind of '(read :safe? #t)' that will ignore 
all kinds of "active" content provided by the client?

Thank you very much!
Lasse
------------------------------------------------------------------------------
All of the data generated in your IT infrastructure is seriously valuable.
Why? It contains a definitive record of application performance, security 
threats, fraudulent activity, and more. Splunk takes this data and makes 
sense of it. IT sense. And common sense.
http://p.sf.net/sfu/splunk-d2d-c2_______________________________________________
Gauche-devel mailing list
Gauche-devel< at >lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gauche-devel

Gauche logo merchandise?

Benjamin L. Russell — 2011-06-01T05:55:47

It would probably be fun to be able to purchase Gauche logo merchandise
(T-shirts, sweatshirts, mouse pads, mugs, etc.), similarly to, say,
Haskell logo merchandise (see "Merchandise - HaskellWiki" at
http://www.haskell.org/haskellwiki/Merchandise).

CafePress.com (see http://www.cafepress.com/) manufactures and sells
custom logo-related merchandise; it even features an online design tool
with the ability to upload images.  Basically, besides basic ordering
information, all that is needed to create a custom design product is a
logo.

Such merchandise could also be helpful for attracting attention to
Gauche and expanding the number of users.

I would definitely be interested in Gauche-related merchandise.  Would
anybody else also be interested?

"Gaucheプログラミング(立読み版) - Karetta" site is down

Benjamin L. Russell — 2011-05-20T11:02:59

Today I just installed Gauche-mingw-0.9.1 on a different computer from
before, and tried to start writing a small application in it, but when I
tried to read your online book "Gaucheプログラミング(立読み版) -
Karetta" ("Gauche Programming (Browsing Edition) - Karetta") (see
http://karetta.jp/) for reference, to my dismay, the service was down,
effective March 13, because of the recent earthquake!

My apartment in Tokyo is extremely cramped, without sufficient table
space to read a book and type on a computer at the same time, so I would
very much prefer to read an on-line version if at all possible.

I also tried to install "Gauchebox-0.9.1-box1.exe", which installs
sample code of the book _Programming Gauche_, but according to the
section entitled "Windows Binary Installer" on "Gauche - A Scheme
Implementation" (see http://practical-scheme.net/gauche/download.html),
the package is still "in preparation."

Is there any way to read an on-line book about programming in Gauche?
Ideally, if there were some way to install the above-mentioned
documentation as an info file for Emacs 23.3.1, then I could just follow
it within Emacs.