tests/bench_string_append.nit

   1 # This file is part of NIT ( http://www.nitlanguage.org ).
   2 #
   3 # Copyright 2004-2008 Jean Privat <jean@pryen.org>
   4 #
   5 # Licensed under the Apache License, Version 2.0 (the "License");
   6 # you may not use this file except in compliance with the License.
   7 # You may obtain a copy of the License at
   8 #
   9 #     http://www.apache.org/licenses/LICENSE-2.0
  10 #
  11 # Unless required by applicable law or agreed to in writing, software
  12 # distributed under the License is distributed on an "AS IS" BASIS,
  13 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  14 # See the License for the specific language governing permissions and
  15 # limitations under the License.
  16
  17 #alt1 import standard
  18 #alt1 import standard::ropes
  19
  20 var n = 4
  21 if not args.is_empty then
  22         n = args.first.to_i
  23 end
  24
  25 var s = "*"
  26 var i = 0
  27 while i < n do
  28         var s2: Buffer = new FlatBuffer.from("Je dis «")
  29         #alt1 s2 = new RopeBuffer.from("Je dis «")
  30         s2.append(s)
  31         s2.append("» et redis «")
  32         s2.append(s)
  33         s2.append("» et deux fois de plus : «")
  34         s2.append(s)
  35         s2.append(s)
  36         s2.append("».\n")
  37         s = s2.to_s
  38         i = i + 1
  39 end
  40 print(s.search_all("Je dis «Je dis").length)
  41
  42 i = 0
  43 var j = 0
  44 while j >= 0 do
  45         var r = s.search_from("Je dis «Je dis", j)
  46         if r == null then break
  47         i = i + 1
  48         j = r.from + 1
  49 end
  50 print(i)
  51
  52 i = 0
  53 for k in [0..s.length[ do
  54         var c = s.chars[k]
  55         if c >= 'a' and c <= 'z' then
  56                 i = i + 1
  57         end
  58 end
  59 print(i)