diff options
author | Andy Wingo <wingo@pobox.com> | 2011-02-13 15:04:08 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-02-13 15:06:11 +0100 |
commit | 6c51a40ace32a1540ffe6623ede64ce639b821fa (patch) | |
tree | ab726348bfa205cbb07f1da9d3fdc8b3a9f244ef | |
parent | d7265e376d27f6bf96bf60c01646ba8893acfba5 (diff) | |
download | guile-6c51a40ace32a1540ffe6623ede64ce639b821fa.tar.gz |
read-enable 'positions by default
* libguile/read.c (scm_read_opts): Default "positions" to #t. The
compiler was already turning it on anyway, and this allows
primitive-load without --auto-compile to also propagate source
information through the expander, for better errors and to let macros
know their source.
* module/language/scheme/spec.scm: No need to enable positions here
now.
-rw-r--r-- | libguile/read.c | 2 | ||||
-rw-r--r-- | module/language/scheme/spec.scm | 8 |
2 files changed, 2 insertions, 8 deletions
diff --git a/libguile/read.c b/libguile/read.c index 28a738e19..5f0be3148 100644 --- a/libguile/read.c +++ b/libguile/read.c @@ -66,7 +66,7 @@ SCM_SYMBOL (sym_nil, "nil"); scm_t_option scm_read_opts[] = { { SCM_OPTION_BOOLEAN, "copy", 0, "Copy source code expressions." }, - { SCM_OPTION_BOOLEAN, "positions", 0, + { SCM_OPTION_BOOLEAN, "positions", 1, "Record positions of source code expressions." }, { SCM_OPTION_BOOLEAN, "case-insensitive", 0, "Convert symbols to lower case."}, diff --git a/module/language/scheme/spec.scm b/module/language/scheme/spec.scm index 802a51d8f..0df4171ff 100644 --- a/module/language/scheme/spec.scm +++ b/module/language/scheme/spec.scm @@ -1,6 +1,6 @@ ;;; Guile Scheme specification -;; Copyright (C) 2001, 2009, 2010 Free Software Foundation, Inc. +;; Copyright (C) 2001, 2009, 2010, 2011 Free Software Foundation, Inc. ;;;; This library is free software; you can redistribute it and/or ;;;; modify it under the terms of the GNU Lesser General Public @@ -26,12 +26,6 @@ #:export (scheme)) ;;; -;;; Reader -;;; - -(read-enable 'positions) - -;;; ;;; Language definition ;;; |