BirDt/imugi
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Export the guarded mutator

Browse source
This commit is contained in:
BirDt_ 2026-04-06 13:44:26 +08:00
parent 5a67f5c53f
commit 54d80c82a7
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
engine/guards.scm
View file

@ -12,6 +12,8 @@
val
default))))
;; Guarded record functions
(export guarded-mutator)
;; Shorthand for defining a guarded mutator for a record field
(define (guarded-mutator record-type field predicate)
(lambda (rec val)