mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-19 21:59:17 +02:00
Add reference-barrier to (srfi 124)
This commit is contained in:
parent
3080087d8c
commit
2d8ce631c7
1 changed files with 4 additions and 2 deletions
|
@ -1,4 +1,6 @@
|
||||||
(define-library (srfi 124)
|
(define-library (srfi 124)
|
||||||
(export make-ephemeron ephemeron? ephemeron-broken?
|
(export make-ephemeron ephemeron? ephemeron-broken?
|
||||||
ephemeron-key ephemeron-datum)
|
ephemeron-key ephemeron-datum reference-barrier)
|
||||||
(import (rename (chibi weak) (ephemeron-value ephemeron-datum))))
|
(import (rename (chibi weak) (ephemeron-value ephemeron-datum)))
|
||||||
|
(begin
|
||||||
|
(define (reference-barrier k) (if #f #f))))
|
||||||
|
|
Loading…
Add table
Reference in a new issue