Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-19 13:49:17 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Add reference-barrier to (srfi 124)

Browse source
This commit is contained in:
Daphne Preston-Kendal 2021-12-14 13:04:21 +01:00
parent 3080087d8c
commit 2d8ce631c7
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lib/srfi/124.sld
View file

@ -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))))