diff options
Diffstat (limited to 'guile/starlet/fixture.scm')
| -rw-r--r-- | guile/starlet/fixture.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/guile/starlet/fixture.scm b/guile/starlet/fixture.scm index 9d210ff..1db713b 100644 --- a/guile/starlet/fixture.scm +++ b/guile/starlet/fixture.scm @@ -31,6 +31,8 @@ get-fixture-universe get-fixture-attrs find-attr + fixture-has-attr? + fixture? scanout-fixture @@ -216,3 +218,6 @@ (attributes #:init-form (list attr ...))) (define-method (scanout-fixture (fixture classname)) scanout-code ...))))) + + +(define fixture-has-attr? find-attr) |