benchmarks/strings/array_to_s_vars/array_to_s_flatstr.nit

   1 # This file is part of NIT ( http://www.nitlanguage.org ).
   2 #
   3 # This file is free software, which comes along with NIT.  This software is
   4 # distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
   5 # without  even  the implied warranty of  MERCHANTABILITY or  FITNESS FOR A
   6 # PARTICULAR PURPOSE.  You can modify it is you want,  provided this header
   7 # is kept unaltered, and a notification of the changes is added.
   8 # You  are  allowed  to  redistribute it and sell it, alone or is a part of
   9 # another product.
  10
  11 # Implementation of Array::to_s with FlatStrings exclusively
  12 #
  13 # To be used as a Mixin at compile-time for benchmarking purposes.
  14 module array_to_s_flatstr
  15
  16 redef class Array[E]
  17
  18         redef fun to_s do
  19                 var i = 1
  20                 var l = length
  21                 if l == 0 then return ""
  22                 var its = _items
  23                 var s = its[0].to_s
  24                 while i < l do
  25                         var e = its[i]
  26                         if e != null then s += e.to_s
  27                         i += 1
  28                 end
  29                 return s
  30         end
  31 end