Index: libguile/pairs.h
===================================================================
RCS file: /cvsroot/guile/guile/guile-core/libguile/pairs.h,v
retrieving revision 1.37
diff -u -r1.37 pairs.h
--- libguile/pairs.h	22 Sep 2004 17:37:01 -0000	1.37
+++ libguile/pairs.h	2 Nov 2004 20:23:56 -0000
@@ -119,7 +119,7 @@
 #define SCM_I_AAAD_PAT 0xfe /* 11111110 */
 #define SCM_I_AAAA_PAT 0xff /* 11111111 */
 
-SCM_API SCM scm_i_chase_pairs (SCM x, scm_t_uint32 pattern);
+SCM_API SCM scm_i_chase_pairs (SCM x, scm_t_bits pattern);
 
 #define scm_cddr(x)   scm_i_chase_pairs ((x), SCM_I_DD_PAT)
 #define scm_cdar(x)   scm_i_chase_pairs ((x), SCM_I_DA_PAT)