1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-04 11:10:27 +02:00

Add documentation for make-guardian.

* module/ice-9/guardians.scm (make-guardian): Add documentation from old
C version.
This commit is contained in:
Mikael Djurfeldt 2025-05-14 09:59:04 +02:00
parent c724f92c89
commit 2a6f6ec354

View file

@ -88,6 +88,8 @@
(values push! pop!))
(define (make-guardian)
"Create a new guardian. A guardian protects a set of objects from
garbage collection, allowing a program to apply cleanup or other"
(define-values (push! pop!) (make-atomic-fifo))
(define (guard! obj)
(when (heap-object? obj)