diff --git a/ice-9/receive.scm b/ice-9/receive.scm
index 0b6754b13..2fbed5fed 100644
--- a/ice-9/receive.scm
+++ b/ice-9/receive.scm
@@ -1,6 +1,6 @@
 ;;;; SRFI-8
 
-;;; Copyright (C) 2000, 2001 Free Software Foundation, Inc.
+;;; Copyright (C) 2000, 2001, 2004 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
@@ -24,3 +24,5 @@
 (define-macro (receive vars vals . body)
   `(call-with-values (lambda () ,vals)
      (lambda ,vars ,@body)))
+
+(cond-expand-provide (current-module) '(srfi-8))