[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Guile interpeter crash
From: |
Dmitry Bogatov |
Subject: |
Guile interpeter crash |
Date: |
Tue, 01 Oct 2013 19:15:41 +0400 |
User-agent: |
mu4e 0.9.9.5; emacs 24.3.1 |
Here is code that results crash (return 134). Hope it is interesting.
guile (GNU Guile) 2.0.9
Copyright (C) 2013 Free Software Foundation, Inc.
(define *define-count* 0)
(define-syntax define#
(syntax-rules ()
((_ obj ...)
(begin
(set! *define-count* (1+ *define-count*))
(define obj ...)))))
(define-syntax define
(syntax-rules ()
((_ obj ...)
(define# obj ...))))
(define# foo 2)
(display *define-count*)
$ guile --no-auto-compile crash.scm
Backtrace:
In ice-9/psyntax.scm:
976: 19 Aborted
$ guile --auto-compile crash.scm
;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
;;; or pass the --no-auto-compile argument to disable.
;;; compiling /share/home/kaction/build/crash.scm
;;; WARNING: compilation of /share/home/kaction/build/crash.scm failed:
;;; ERROR: Throw to key `vm-error' with args `(vm-run "VM: Stack overflow" ())'.
aborted
--
Best regards, Dmitry Bogatov <address@hidden>,
Free Software supporter and netiquette guardian.
git clone git://kaction.name/rc-files.git --depth 1
GPG: 54B7F00D
Html mail and proprietary format attachments are forwarded to /dev/null.
pgpXoM4kJUPf8.pgp
Description: PGP signature
- Guile interpeter crash,
Dmitry Bogatov <=