summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/luasocket/test/stufftest.lua
blob: 490053f28054ac65afdbf1830d72d6bf6c6f4aa7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
local mime = require("mime")

function test_dot(original, right)
    local result, n = mime.dot(2, original)
    assert(result == right, "->" .. result .. "<-")
    print("ok")
end

function test_stuff(original, right)
    local result, n = mime.dot(2, original)
    assert(result == right, "->" .. result .. "<-")
    print("ok")
end

test_dot("abc", "abc")
test_dot("", "")
test_dot("\r\n", "\r\n")
test_dot("\r\n.", "\r\n..")
test_dot(".\r\n.", "..\r\n..")
test_dot(".\r\n.", "..\r\n..")
test_dot("abcd.\r\n.", "abcd.\r\n..")