summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/read.c2
-rw-r--r--module/language/scheme/spec.scm8
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
;;;