1 files changed, 5 insertions, 0 deletions
diff --git a/guile/starlet/base.scm b/guile/starlet/base.scm
index 76d6f61..eb17839 100644
--- a/guile/starlet/base.scm
+++ b/guile/starlet/base.scm
@@ -18,6 +18,7 @@
             percent->dmxval
             hirestime
             state-for-each
+            get-attributes
             set-attr!
             get-attr-name
             value->number
@@ -93,6 +94,10 @@
     #:getter get-scanout-func))
 
 
+(define (get-attributes f)
+  (slot-ref f 'attributes))
+
+
 (define (fixture? f)
   (is-a? f <fixture>))