* README: Update, document available SRFIs.

[bpt/guile.git] / srfi / srfi-17.scm

diff --git a/srfi/srfi-17.scm b/srfi/srfi-17.scm
index 1a82ea0..fda6fb9 100644 (file)
--- a/srfi/srfi-17.scm
+++ b/srfi/srfi-17.scm
@@ -49,6 +49,8 @@
           caddar cadddr cdaaar cdaadr cdadar cdaddr cddaar cddadr
           cdddar cddddr string-ref vector-ref))
 
+(cond-expand-provide (current-module) '(srfi-17))
+
 ;;; Procedures
 
 (define getter-with-setter make-procedure-with-setter)