mirror of
https://github.com/nim-lang/Nim.git
synced 2026-01-07 21:43:33 +00:00
b1c232aca1
* improve tests for collections * remove remaining code blocks in deques.nim * improve runnableExamples
106 lines
2.5 KiB
Nim
106 lines
2.5 KiB
Nim
discard """
|
|
targets: "c js"
|
|
"""
|
|
|
|
# see also: tdeques, tlists, tcritbits
|
|
|
|
import sets, tables, sequtils
|
|
|
|
block tapply:
|
|
var x = @[1, 2, 3]
|
|
x.apply(proc(x: var int) = x = x+10)
|
|
x.apply(proc(x: int): int = x+100)
|
|
x.applyIt(it+5000)
|
|
doAssert x == @[5111, 5112, 5113]
|
|
|
|
block tmapit:
|
|
var x = @[1, 2, 3]
|
|
# This mapIt call will run with preallocation because ``len`` is available.
|
|
var y = x.mapIt($(it+10))
|
|
doAssert y == @["11", "12", "13"]
|
|
|
|
type structureWithoutLen = object
|
|
a: array[5, int]
|
|
|
|
iterator items(s: structureWithoutLen): int {.inline.} =
|
|
yield s.a[0]
|
|
yield s.a[1]
|
|
yield s.a[2]
|
|
yield s.a[3]
|
|
yield s.a[4]
|
|
|
|
var st: structureWithoutLen
|
|
st.a[0] = 0
|
|
st.a[1] = 1
|
|
st.a[2] = 2
|
|
st.a[3] = 3
|
|
st.a[4] = 4
|
|
|
|
# this will run without preallocating the result
|
|
# since ``len`` is not available
|
|
var r = st.mapIt($(it+10))
|
|
doAssert r == @["10", "11", "12", "13", "14"]
|
|
|
|
|
|
|
|
# Collections to string:
|
|
|
|
# Tests for tuples
|
|
doAssert $(1, 2, 3) == "(1, 2, 3)"
|
|
doAssert $("1", "2", "3") == """("1", "2", "3")"""
|
|
doAssert $('1', '2', '3') == """('1', '2', '3')"""
|
|
|
|
# Tests for seqs
|
|
doAssert $(@[1, 2, 3]) == "@[1, 2, 3]"
|
|
doAssert $(@["1", "2", "3"]) == """@["1", "2", "3"]"""
|
|
doAssert $(@['1', '2', '3']) == """@['1', '2', '3']"""
|
|
|
|
# Tests for sets
|
|
doAssert $(toHashSet([1])) == "{1}"
|
|
doAssert $(toHashSet(["1"])) == """{"1"}"""
|
|
doAssert $(toHashSet(['1'])) == """{'1'}"""
|
|
doAssert $(toOrderedSet([1, 2, 3])) == "{1, 2, 3}"
|
|
doAssert $(toOrderedSet(["1", "2", "3"])) == """{"1", "2", "3"}"""
|
|
doAssert $(toOrderedSet(['1', '2', '3'])) == """{'1', '2', '3'}"""
|
|
|
|
# see also: tcritbitsToString, tlistsToString
|
|
|
|
# Tests for tables
|
|
when defined(nimIntHash1):
|
|
doAssert $({1: "1", 2: "2"}.toTable) == """{1: "1", 2: "2"}"""
|
|
else:
|
|
doAssert $({1: "1", 2: "2"}.toTable) == """{2: "2", 1: "1"}"""
|
|
let tabStr = $({"1": 1, "2": 2}.toTable)
|
|
doAssert (tabStr == """{"2": 2, "1": 1}""" or tabStr == """{"1": 1, "2": 2}""")
|
|
|
|
# Test escaping behavior
|
|
block:
|
|
var s = ""
|
|
s.addQuoted('\0')
|
|
s.addQuoted('\31')
|
|
s.addQuoted('\127')
|
|
doAssert s == "'\\x00''\\x1F''\\x7F'"
|
|
block:
|
|
var s = ""
|
|
s.addQuoted('\\')
|
|
s.addQuoted('\'')
|
|
s.addQuoted('\"')
|
|
doAssert s == """'\\''\'''\"'"""
|
|
block:
|
|
var s = ""
|
|
s.addQuoted("å")
|
|
s.addQuoted("ä")
|
|
s.addQuoted("ö")
|
|
s.addEscapedChar('\xFF')
|
|
doAssert s == """"å""ä""ö"\xFF"""
|
|
|
|
# Test customized element representation
|
|
type CustomString = object
|
|
|
|
proc addQuoted(s: var string, x: CustomString) =
|
|
s.add("<CustomString>")
|
|
|
|
block:
|
|
let s = @[CustomString()]
|
|
doAssert $s == "@[<CustomString>]"
|