stdlib: Strings, added tests for is_numeric function

Signed-off-by: Lucas Bajolet <r4pass@hotmail.com>

diff --git a/tests/sav/test_string_is_numeric.sav b/tests/sav/test_string_is_numeric.sav
new file mode 100644 (file)
index 0000000..e53b6ea
--- /dev/null
+++ b/tests/sav/test_string_is_numeric.sav
@@ -0,0 +1,14 @@
+false
+true
+true
+true
+false
+false
+false
+false
+false
+false
+false
+false
+true
+false

diff --git a/tests/test_string_is_numeric.nit b/tests/test_string_is_numeric.nit
new file mode 100644 (file)
index 0000000..aa02268
--- /dev/null
+++ b/tests/test_string_is_numeric.nit
@@ -0,0 +1,65 @@
+# This file is part of NIT ( http://www.nitlanguage.org ).
+#
+# Copyright 2004-2008 Jean Privat <jean@pryen.org>
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+
+module test_string_is_numeric
+
+#False
+print "d52".is_numeric
+
+#True
+print "45".is_numeric
+
+#True
+print "45.3".is_numeric
+
+#True
+print "45,3".is_numeric
+
+#False
+print "1,000.80".is_numeric
+
+#False
+print "1,000.45.65".is_numeric
+
+#False
+print "6.000,58".is_numeric
+
+#False
+print "6.000,58,65".is_numeric
+
+#False
+print "6.00.512,32".is_numeric
+
+#False
+print "6.000.251,52".is_numeric
+
+#False
+print "585,210.52".is_numeric
+
+#False
+print "21,52,210.52".is_numeric
+
+var buf = new Buffer
+
+buf.append("45.3")
+
+#True
+print buf.is_numeric
+
+buf.append("d")
+
+#False
+print buf.is_numeric