bug#24318: char<=? with three args

2016-08-27 Thread Helmut Eller
Compiling a file x.scm: (library (x) (export) (import (rnrs)) (define (foo x) (char<=? #\0 x #\9))) causes an error: shell> guile --version | head -n1 guile (GNU Guile) 2.1.3.104-8f2f8 shell> guile -c '(compile-file "x.scm")' Backtrace: In system/base/compile.scm: 152:6

bug#24320: Error when printing foreign functions

2016-08-27 Thread Robin Templeton
The following program causes `(@ (system vm program) print-program)' to throw an exception when run in Guile 2.1.3.104-8f2f8: (use-modules (system foreign)) (format #t "~S~%" (pointer->procedure double (dynamic-func "sqrt" (dynamic-link)) (list double)))

bug#24321: Guardian fails to protect procedure properties

2016-08-27 Thread Robin Templeton
The following expression produces possibly erroneous results in Guile 2.1.3.104-8f2f8 (with Debian's libgc1c2 version 1:7.4.2-8): (let ((guardian (make-guardian)) (foo (eval '(lambda () #f) (interaction-environment (set-procedure-property! foo 'wibbly 'wobbly) (guardian foo) (forma