Added missing export of regexp-fold-right.

This commit is contained in:
mainzelm 2001-09-20 13:29:17 +00:00
parent a2eb80d3fe
commit 8e233fbf1c
1 changed files with 6 additions and 6 deletions

View File

@ -190,12 +190,12 @@
&opt (proc (:exact-integer :value) :value) &opt (proc (:exact-integer :value) :value)
:exact-integer) :exact-integer)
:value)) :value))
(regexp-fold (proc (:value (proc (:value :exact-integer :value) :value) (regexp-fold-right (proc (:value (proc (:value :exact-integer :value) :value)
:value :value
:string :string
&opt (proc (:exact-integer :value) :value) &opt (proc (:exact-integer :value) :value)
:exact-integer) :exact-integer)
:value)) :value))
(regexp-for-each (proc (:value (proc (:value) :unspecific) (regexp-for-each (proc (:value (proc (:value) :unspecific)
:string &opt :exact-integer) :string &opt :exact-integer)
:unspecific)))) :unspecific))))