--- srfi-34.scm.~1.1.~	2003-04-30 10:06:33.000000000 +1000
+++ srfi-34.scm	2003-07-17 07:58:22.000000000 +1000
@@ -31,6 +31,8 @@
 	    raise)
   #:export-syntax (guard))
 
+(cond-expand-provide (current-module) '(srfi-34))
+
 (define throw-key 'srfi-34)
 
 (define (with-exception-handler handler thunk)