remove unused stringlist selftest

Signed-off-by: Tobias Ulmer <tu@emlix.com>

diff --git a/local/sl.lua b/local/sl.lua
index cc9b87e167b59c798979b8c58ea1fcbd0f1bc6f1..dc1f98718305a08fbba24fdb8c8dd7f9aa2414f4 100644 (file)
--- a/local/sl.lua
+++ b/local/sl.lua
@@ -185,92 +185,6 @@ function sl.sl:totable_sorted()
     return table.sort(self:totable_inserted())
 end
 
---[[
-local function selftest()
-    local s1 = sl.sl:new()
-
-    assert(s1:size() == 0)
-    assert(s1.class.name == "sl")
-
-    s1:insert("ccc")
-    s1:insert("bbb")
-    s1:insert("aaa")
-    s1:insert("aaa")
-
-    assert(s1:size() == 4)
-
-    local c = 1
-    for entry in s1:iter_inserted() do
-        assert(c <= s1:size() and c > 0)
-        if c == 1 then assert(entry == "ccc") end
-        if c == 2 then assert(entry == "bbb") end
-        if c == 3 then assert(entry == "aaa") end
-        if c == 4 then assert(entry == "aaa") end
-        c = c+1
-    end
-
-    assert(s1:lookup("foo") == false)
-    assert(s1:lookup("bbb") == true)
-
-    s1:insert("xxx")
-    assert(s1:size() == 5)
-    c = 1
-    for entry in s1:iter_sorted() do
-        assert(c <= s1:size() and c > 0)
-        if c == 1 then assert(entry == "aaa") end
-        if c == 2 then assert(entry == "aaa") end
-        if c == 3 then assert(entry == "bbb") end
-        if c == 4 then assert(entry == "ccc") end
-        if c == 5 then assert(entry == "xxx") end
-        c = c+1
-    end
-
-    assert(s1:remove("doesnotexist") == false)
-    assert(s1:remove("aaa") == true)
-    assert(s1:size() == 3)
-    c = 1
-    for entry in s1:iter_sorted() do
-        assert(c <= s1:size() and c > 0)
-        --e2lib.logf(1, "entry=%s", entry)
-        if c == 1 then assert(entry == "bbb") end
-        if c == 2 then assert(entry == "ccc") end
-        if c == 3 then assert(entry == "xxx") end
-        c = c+1
-    end
-
-    assert(s1:concat_sorted() == "bbbcccxxx")
-    assert(s1:concat_sorted("y") == "bbbycccyxxx")
-
-    local s2 = sl.sl:new(false, true)
-
-    c = false
-    for _,v in ipairs({"bbb", "aaa", "xxx", "foo", "bla", "bar", "xxx"}) do
-        if not s2:insert(v) then
-            c = true
-            assert(v == "xxx")
-        end
-    end
-    assert(c == true)
-
-    local s3 = sl.sl:new(true, false)
-
-    for _,v in ipairs({"bbb", "aaa", "xxx", "foo", "bar", "bar", "xxx", "y"}) do
-        assert(s3:insert(v) == true)
-    end
-    assert(s3:size() == 6)
-
-    local s4 = sl.sl:new()
-    s4:insert("")
-    s4:insert("")
-    s4:insert("")
-
-    assert(s4:concat_sorted() == "")
-    assert(s4:concat_sorted("x") == "xx")
-end
-
-selftest()
---]]
-
 return strict.lock(sl)
 
 -- vim:sw=4:sts=4:et: