diff --git a/scheme/srfi/srfi-14.scm b/scheme/srfi/srfi-14.scm
index 03c05b1..9f42037 100644
--- a/scheme/srfi/srfi-14.scm
+++ b/scheme/srfi/srfi-14.scm
@@ -532,7 +532,7 @@
   base-cs)
 
 
-;;; {string, char, char-set, char predicate} -> char-set
+;;; {string, char, char-set} -> char-set
 
 (define (x->char-set x)
   (cond ((char-set? x) x)