Add type for regexp-replaces

Please merge to v6.0
This commit is contained in:
Asumu Takikawa 2013-12-05 01:47:41 -05:00
parent 2d8a3cffda
commit 1f74a67139

View File

@ -333,6 +333,13 @@
(->opt (Un -String -Regexp) -String (Un -String (->* (list -String) -String -String)) [-Bytes] -String)
(->opt (Un -Bytes -Byte-Regexp) (Un -Bytes -String) (Un -Bytes -String (->* (list -Bytes) -Bytes -Bytes)) [-Bytes] -Bytes)
(->opt -Pattern -Bytes (Un -Bytes -String (->* (list -Bytes) -Bytes -Bytes)) [-Bytes] -Bytes))]
[regexp-replaces
(-> (Un -String -Bytes)
(-lst (-lst* (Un -String -Bytes -Regexp -Byte-Regexp)
(Un -String -Bytes
(->* (list -String) -String -String)
(->* (list -Bytes) -Bytes -Bytes))))
(Un -String -Bytes))]
[regexp-replace-quote
(cl->*
[-> -String -String]