1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-31 17:30:24 +02:00

* boot-9.scm (default-duplicate-binding-handler): Set default to

'(replace warn last)
This commit is contained in:
Mikael Djurfeldt 2003-03-12 17:16:36 +00:00
parent fe6ee0528b
commit 6496a6638b
3 changed files with 4 additions and 4 deletions

4
NEWS
View file

@ -79,7 +79,7 @@ The new default behavior of the module system when a name collision
has been detected is to has been detected is to
1. Give priority to bindings marked as a replacement. 1. Give priority to bindings marked as a replacement.
2. Issue a warning. 2. Issue a warning (different warning if overriding core binding).
3. Give priority to the last encountered binding (this corresponds to 3. Give priority to the last encountered binding (this corresponds to
the old behavior). the old behavior).
@ -116,7 +116,7 @@ These two are provided by the (oop goops) module:
The default duplicates handler is: The default duplicates handler is:
(replace warn last) (replace warn-override-core warn last)
A recommended handler (which is likely to correspond to future Guile A recommended handler (which is likely to correspond to future Guile
behavior) can be installed with: behavior) can be installed with:

View file

@ -2,7 +2,7 @@
* boot-9.scm (ipow-by-squaring): Removed. * boot-9.scm (ipow-by-squaring): Removed.
(default-duplicate-binding-handler): Set default to (default-duplicate-binding-handler): Set default to
'(replace warn last) '(replace warn-override-core warn last)
* boot-9.scm (module-make-local-var!): Use module-add!. * boot-9.scm (module-make-local-var!): Use module-add!.
(module-primitive-add!): New function. (module-primitive-add!): New function.

View file

@ -2904,7 +2904,7 @@
(make-mutable-parameter #f)) (make-mutable-parameter #f))
(define default-duplicate-binding-handler (define default-duplicate-binding-handler
(make-mutable-parameter '(replace warn last) (make-mutable-parameter '(replace warn-override-core warn last)
(lambda (handler-names) (lambda (handler-names)
(default-duplicate-binding-procedures (default-duplicate-binding-procedures
(lookup-duplicates-handlers handler-names)) (lookup-duplicates-handlers handler-names))