diff --git a/src/validators/date.art b/src/validators/date.art index 0355390..f6f3eea 100644 --- a/src/validators/date.art +++ b/src/validators/date.art @@ -52,7 +52,7 @@ define :dateValidator is :validator [ ; try converting to date using the format ; and catch any potential errors return not? throws? [ - _: to :date .format:fmt str + discard to :date .format:fmt str ] ] diff --git a/src/validators/floating.art b/src/validators/floating.art index 62b65b1..d7d37da 100644 --- a/src/validators/floating.art +++ b/src/validators/floating.art @@ -23,7 +23,7 @@ define :floatingValidator is :validator [ ; based on our own `to` converter ; and catching possible errors with `throws?` not? throws? [ - _: to :floating str + discard to :floating str ] ] diff --git a/src/validators/integer.art b/src/validators/integer.art index ff9642f..1703786 100644 --- a/src/validators/integer.art +++ b/src/validators/integer.art @@ -22,7 +22,7 @@ define :integerValidator is :validator [ ; based on our own `to` converter ; and catching possible errors with `throws?` not? throws? [ - _: to :integer str + discard to :integer str ] ] diff --git a/src/validators/version.art b/src/validators/version.art index d42d089..1b98554 100644 --- a/src/validators/version.art +++ b/src/validators/version.art @@ -26,7 +26,7 @@ define :versionValidator is :validator [ -> return false not? throws? [ - _: to :version str + discard to :version str ] ]