# This file is part of NIT ( http://www.nitlanguage.org ).
#
-# This file is free software, which comes along with NIT. This software is
-# distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
-# without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
-# PARTICULAR PURPOSE. You can modify it if you want, provided this header
-# is kept unaltered, and a notification of the changes is added.
-# You are allowed to redistribute it and sell it, alone or as a part of
-# another product.
+# 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_ropes
+import core
+intrude import core::text::ropes
-var str_part_1 = "Je"
+# Force building a Rope
+redef fun maxlen: Int do return once 2
-var str_part_2 = "suis"
+var x :String = new Concat("NODE", "AT")
-var str_part_3 = "ici"
+x += "TEST"
-var str_part_4 = "."
+print x
-var space = " "
+var lst = new List[String]
-var test = "Je suis ici."
+lst.push("ZZ")
-var rope_uniq_test = new ImmutableRope.with_string("zzzzzzzzzzzzzzzzzzzzzzzzzzzz")
+lst.push((lst.last * 5))
-var not_rope_uniq_test = new ImmutableRope.with_string("zzzzzzzzzzzzzezzzzzzzzzzzzzz")
+lst.push(lst.last.insert_at("AA", 2))
-################################
-# Rope methods tests #
-################################
+lst.push(lst.last.insert_at("NN", 0))
-var buf = new Buffer
+lst.push(lst.last.insert_at("II", 1))
-buf.append(str_part_1)
-buf.append(space)
-buf.append(str_part_2)
-buf.append(space)
-buf.append(str_part_3)
-buf.append(str_part_4)
+lst.push(lst.last.insert_at(lst.last, 2))
-print buf
+var ss = lst.last.substring(4,4)
-var buf_rope = new BufferRope
+print ss
-buf_rope.append_multi(str_part_1,space,str_part_2,space,str_part_3,str_part_4)
+ss = ss.insert_at("DD", 2)
-var buf_rope_with_str = new BufferRope.with_string(test)
+print ss
-print buf_rope*3
+ss = ss.insert_at("EE", 0)
-print buf_rope_with_str*5
+print ss
-print buf_rope + buf_rope_with_str
+ss = ss.insert_at("FF", ss.length)
-assert buf_rope.length == buf_rope_with_str.length
+print ss
-assert buf_rope == buf_rope_with_str
+ss = ss.to_lower
-assert buf_rope.multi_concat(buf_rope, buf_rope) == buf_rope * 3
+print ss
-print buf_rope.subrope(0, 5)
+ss = ss.to_upper
-assert buf_rope.subrope(0, 5) == "Je su"
+print ss
-buf_rope.append("Hi !")
+ss = ss.reversed
-assert buf_rope > buf_rope_with_str
+print ss
-assert buf_rope == buf_rope.chars.to_s
+var atb = new Array[String]
-assert buf_rope.chars.to_s == buf_rope
+var s: String = "./examples/hello_world.nit".substring(11,11) + ".types"
+s += "."
+s += "1"
+s += ".o"
-assert buf == buf_rope_with_str
+print s
-######################################
-# BufferRope methods tests #
-######################################
+var str = "now" + " step" + " live..."
-assert buf_rope + buf_rope == buf_rope.concat(buf_rope)
+print str
-assert buf_rope == buf_rope.freeze
+print str.reversed
-######################################
-# Rope.chars methods tests #
-######################################
+for i in str.chars do printn i
+printn "\n"
-assert buf_rope.chars[3] == 's'
+for i in [0..str.length[ do printn str.chars[i]
+printn "\n"
-assert buf_rope.chars.index_of('k') == -1
+var iter = str.chars.iterator
+for i in [0..str.length[ do
+ assert str.chars[i] == iter.item
+ iter.next
+end
-assert buf_rope.chars.index_of('s') == 3
+assert "now step live...".hash == str.hash
-assert buf_rope.chars.count('s') == 4
+for i in str.chars.iterator_from(8) do printn i
+printn "\n"
-assert buf_rope.chars.last == '!'
+for i in str.chars.iterator_from(str.length-1) do printn i
+printn "\n"
-assert rope_uniq_test.chars.has_only('z')
+for i in str.chars.reverse_iterator do printn i
+printn "\n"
-assert not not_rope_uniq_test.chars.has_only('z')
+for i in str.chars.reverse_iterator_from(0) do printn i
+printn "\n"
-assert (new BufferRope).chars.has_only('l')
+var str2 = str.insert_at(str.substring_from(3), 3)
-print buf_rope.to_lower
+print str2
-print buf_rope.to_upper
+print str2.substring(2,3)
+for i in lst do print i
nitlanguage / nit.git / blobdiff