renamed writeln to writeLine in tests
This commit is contained in:
parent
b6252af5c6
commit
69e15ac32f
39 changed files with 456 additions and 456 deletions
|
|
@ -12,7 +12,7 @@ type
|
||||||
proc len(x: TMyType): int {.inline.} = return x.len
|
proc len(x: TMyType): int {.inline.} = return x.len
|
||||||
|
|
||||||
proc x(s: TMyType, len: int) =
|
proc x(s: TMyType, len: int) =
|
||||||
writeln(stdout, len(s))
|
writeLine(stdout, len(s))
|
||||||
|
|
||||||
var
|
var
|
||||||
m: TMyType
|
m: TMyType
|
||||||
|
|
|
||||||
|
|
@ -10,6 +10,6 @@ import mambsym1, times
|
||||||
var
|
var
|
||||||
v = mDec #ERROR_MSG ambiguous identifier
|
v = mDec #ERROR_MSG ambiguous identifier
|
||||||
|
|
||||||
writeln(stdout, ord(v))
|
writeLine(stdout, ord(v))
|
||||||
|
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -22,10 +22,10 @@ proc test() =
|
||||||
|
|
||||||
b = a # perform a deep copy here!
|
b = a # perform a deep copy here!
|
||||||
b.seq = @["xyz", "huch", "was", "soll"]
|
b.seq = @["xyz", "huch", "was", "soll"]
|
||||||
writeln(stdout, len(a.seq))
|
writeLine(stdout, len(a.seq))
|
||||||
writeln(stdout, a.seq[3])
|
writeLine(stdout, a.seq[3])
|
||||||
writeln(stdout, len(b.seq))
|
writeLine(stdout, len(b.seq))
|
||||||
writeln(stdout, b.seq[3])
|
writeLine(stdout, b.seq[3])
|
||||||
writeln(stdout, b.y)
|
writeLine(stdout, b.y)
|
||||||
|
|
||||||
test()
|
test()
|
||||||
|
|
|
||||||
|
|
@ -16,8 +16,8 @@ proc main() =
|
||||||
p = find(example, "=")
|
p = find(example, "=")
|
||||||
a = substr(example, 0, p-1)
|
a = substr(example, 0, p-1)
|
||||||
b = substr(example, p+1)
|
b = substr(example, p+1)
|
||||||
writeln(stdout, a & '=' & b)
|
writeLine(stdout, a & '=' & b)
|
||||||
#writeln(stdout, b)
|
#writeLine(stdout, b)
|
||||||
|
|
||||||
main()
|
main()
|
||||||
#OUT TEMP=C:\Programs\xyz\bin
|
#OUT TEMP=C:\Programs\xyz\bin
|
||||||
|
|
|
||||||
|
|
@ -13,7 +13,7 @@ type
|
||||||
proc forw: int {. .}
|
proc forw: int {. .}
|
||||||
|
|
||||||
proc lier(): int {.raises: [IO2Error].} =
|
proc lier(): int {.raises: [IO2Error].} =
|
||||||
writeln stdout, "arg"
|
writeLine stdout, "arg"
|
||||||
|
|
||||||
proc forw: int =
|
proc forw: int =
|
||||||
raise newException(IOError, "arg")
|
raise newException(IOError, "arg")
|
||||||
|
|
|
||||||
|
|
@ -13,7 +13,7 @@ type
|
||||||
proc forw: int {.raises: [].}
|
proc forw: int {.raises: [].}
|
||||||
|
|
||||||
proc lier(): int {.raises: [IOError].} =
|
proc lier(): int {.raises: [IOError].} =
|
||||||
writeln stdout, "arg"
|
writeLine stdout, "arg"
|
||||||
|
|
||||||
proc forw: int =
|
proc forw: int =
|
||||||
raise newException(IOError, "arg")
|
raise newException(IOError, "arg")
|
||||||
|
|
|
||||||
|
|
@ -12,7 +12,7 @@ type
|
||||||
EIO2 = ref object of EIO
|
EIO2 = ref object of EIO
|
||||||
|
|
||||||
proc raiser(): int {.tags: [TObj, FWriteIO].} =
|
proc raiser(): int {.tags: [TObj, FWriteIO].} =
|
||||||
writeln stdout, "arg"
|
writeLine stdout, "arg"
|
||||||
|
|
||||||
var o: TObjB
|
var o: TObjB
|
||||||
o.fn = raiser
|
o.fn = raiser
|
||||||
|
|
|
||||||
|
|
@ -15,7 +15,7 @@ proc q() {.tags: [FIO].} =
|
||||||
nil
|
nil
|
||||||
|
|
||||||
proc raiser(): int =
|
proc raiser(): int =
|
||||||
writeln stdout, "arg"
|
writeLine stdout, "arg"
|
||||||
if true:
|
if true:
|
||||||
q()
|
q()
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -63,12 +63,12 @@ proc caseTree(lvl: int = 0): PCaseNode =
|
||||||
if lvl == 3: result = newCaseNode("data item")
|
if lvl == 3: result = newCaseNode("data item")
|
||||||
else: result = newCaseNode(caseTree(lvl+1), caseTree(lvl+1))
|
else: result = newCaseNode(caseTree(lvl+1), caseTree(lvl+1))
|
||||||
|
|
||||||
proc finalizeBNode(n: TBNode) = writeln(stdout, n.data)
|
proc finalizeBNode(n: TBNode) = writeLine(stdout, n.data)
|
||||||
proc finalizeNode(n: PNode) =
|
proc finalizeNode(n: PNode) =
|
||||||
assert(n != nil)
|
assert(n != nil)
|
||||||
write(stdout, "finalizing: ")
|
write(stdout, "finalizing: ")
|
||||||
if isNil(n.data): writeln(stdout, "nil!")
|
if isNil(n.data): writeLine(stdout, "nil!")
|
||||||
else: writeln(stdout, n.data)
|
else: writeLine(stdout, n.data)
|
||||||
|
|
||||||
var
|
var
|
||||||
id: int = 1
|
id: int = 1
|
||||||
|
|
@ -82,7 +82,7 @@ proc buildTree(depth = 1): PNode =
|
||||||
inc(id)
|
inc(id)
|
||||||
|
|
||||||
proc returnTree(): PNode =
|
proc returnTree(): PNode =
|
||||||
writeln(stdout, "creating id: " & $id)
|
writeLine(stdout, "creating id: " & $id)
|
||||||
new(result, finalizeNode)
|
new(result, finalizeNode)
|
||||||
result.data = $id
|
result.data = $id
|
||||||
new(result.le, finalizeNode)
|
new(result.le, finalizeNode)
|
||||||
|
|
@ -92,26 +92,26 @@ proc returnTree(): PNode =
|
||||||
inc(id)
|
inc(id)
|
||||||
|
|
||||||
# now create a cycle:
|
# now create a cycle:
|
||||||
writeln(stdout, "creating id (cyclic): " & $id)
|
writeLine(stdout, "creating id (cyclic): " & $id)
|
||||||
var cycle: PNode
|
var cycle: PNode
|
||||||
new(cycle, finalizeNode)
|
new(cycle, finalizeNode)
|
||||||
cycle.data = $id
|
cycle.data = $id
|
||||||
cycle.le = cycle
|
cycle.le = cycle
|
||||||
cycle.ri = cycle
|
cycle.ri = cycle
|
||||||
inc(id)
|
inc(id)
|
||||||
#writeln(stdout, "refcount: " & $refcount(cycle))
|
#writeLine(stdout, "refcount: " & $refcount(cycle))
|
||||||
#writeln(stdout, "refcount le: " & $refcount(cycle.le))
|
#writeLine(stdout, "refcount le: " & $refcount(cycle.le))
|
||||||
#writeln(stdout, "refcount ri: " & $refcount(cycle.ri))
|
#writeLine(stdout, "refcount ri: " & $refcount(cycle.ri))
|
||||||
|
|
||||||
proc printTree(t: PNode) =
|
proc printTree(t: PNode) =
|
||||||
if t == nil: return
|
if t == nil: return
|
||||||
writeln(stdout, "printing")
|
writeLine(stdout, "printing")
|
||||||
writeln(stdout, t.data)
|
writeLine(stdout, t.data)
|
||||||
printTree(t.le)
|
printTree(t.le)
|
||||||
printTree(t.ri)
|
printTree(t.ri)
|
||||||
|
|
||||||
proc unsureNew(result: var PNode) =
|
proc unsureNew(result: var PNode) =
|
||||||
writeln(stdout, "creating unsure id: " & $id)
|
writeLine(stdout, "creating unsure id: " & $id)
|
||||||
new(result, finalizeNode)
|
new(result, finalizeNode)
|
||||||
result.data = $id
|
result.data = $id
|
||||||
new(result.le, finalizeNode)
|
new(result.le, finalizeNode)
|
||||||
|
|
@ -176,7 +176,7 @@ proc main() =
|
||||||
var s: seq[string] = @[]
|
var s: seq[string] = @[]
|
||||||
for i in 1..100:
|
for i in 1..100:
|
||||||
add s, "hohoho" # test reallocation
|
add s, "hohoho" # test reallocation
|
||||||
writeln(stdout, s[89])
|
writeLine(stdout, s[89])
|
||||||
write(stdout, "done!\n")
|
write(stdout, "done!\n")
|
||||||
|
|
||||||
var
|
var
|
||||||
|
|
@ -184,7 +184,7 @@ var
|
||||||
s: string
|
s: string
|
||||||
s = ""
|
s = ""
|
||||||
s = ""
|
s = ""
|
||||||
writeln(stdout, repr(caseTree()))
|
writeLine(stdout, repr(caseTree()))
|
||||||
father.t.data = @["ha", "lets", "stress", "it"]
|
father.t.data = @["ha", "lets", "stress", "it"]
|
||||||
father.t.data = @["ha", "lets", "stress", "it"]
|
father.t.data = @["ha", "lets", "stress", "it"]
|
||||||
var t = buildTree()
|
var t = buildTree()
|
||||||
|
|
@ -199,5 +199,5 @@ GC_fullCollect()
|
||||||
# the M&S GC fails with this call and it's unclear why. Definitely something
|
# the M&S GC fails with this call and it's unclear why. Definitely something
|
||||||
# we need to fix!
|
# we need to fix!
|
||||||
GC_fullCollect()
|
GC_fullCollect()
|
||||||
writeln(stdout, GC_getStatistics())
|
writeLine(stdout, GC_getStatistics())
|
||||||
write(stdout, "finished\n")
|
write(stdout, "finished\n")
|
||||||
|
|
|
||||||
|
|
@ -15,7 +15,7 @@ if find(root, "world"):
|
||||||
for str in items(root):
|
for str in items(root):
|
||||||
stdout.write(str)
|
stdout.write(str)
|
||||||
else:
|
else:
|
||||||
stdout.writeln("BUG")
|
stdout.writeLine("BUG")
|
||||||
|
|
||||||
var
|
var
|
||||||
r2: PBinaryTree[int]
|
r2: PBinaryTree[int]
|
||||||
|
|
|
||||||
|
|
@ -92,7 +92,7 @@ when isMainModule:
|
||||||
for str in items(root):
|
for str in items(root):
|
||||||
stdout.write(str)
|
stdout.write(str)
|
||||||
else:
|
else:
|
||||||
stdout.writeln("BUG")
|
stdout.writeLine("BUG")
|
||||||
|
|
||||||
var
|
var
|
||||||
r2: PBinaryTree[int]
|
r2: PBinaryTree[int]
|
||||||
|
|
|
||||||
|
|
@ -184,7 +184,7 @@ proc traceTree[T,D](root: PNode[T,D]) =
|
||||||
|
|
||||||
|
|
||||||
proc traceln(space: string) =
|
proc traceln(space: string) =
|
||||||
writeln stdout, ""
|
writeLine stdout, ""
|
||||||
write stdout, space
|
write stdout, space
|
||||||
|
|
||||||
proc doTrace(n: PNode[T,D], level: int) =
|
proc doTrace(n: PNode[T,D], level: int) =
|
||||||
|
|
@ -192,7 +192,7 @@ proc traceTree[T,D](root: PNode[T,D]) =
|
||||||
traceln(space)
|
traceln(space)
|
||||||
write stdout, "node: "
|
write stdout, "node: "
|
||||||
if n == nil:
|
if n == nil:
|
||||||
writeln stdout, "is empty"
|
writeLine stdout, "is empty"
|
||||||
return
|
return
|
||||||
write stdout, n.count
|
write stdout, n.count
|
||||||
write stdout, " elements: "
|
write stdout, " elements: "
|
||||||
|
|
@ -219,7 +219,7 @@ proc traceTree[T,D](root: PNode[T,D]) =
|
||||||
else : write stdout, el.key
|
else : write stdout, el.key
|
||||||
if el.node != nil: doTrace(el.node, level +1)
|
if el.node != nil: doTrace(el.node, level +1)
|
||||||
else : write stdout, " empty "
|
else : write stdout, " empty "
|
||||||
writeln stdout,""
|
writeLine stdout,""
|
||||||
|
|
||||||
doTrace(root, 0)
|
doTrace(root, 0)
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -50,8 +50,8 @@ proc main*(infile: string, a, b: int, someverylongnamewithtype = 0,
|
||||||
# this should be an error!
|
# this should be an error!
|
||||||
if initBaseLexer(L, infile, 30): nil
|
if initBaseLexer(L, infile, 30): nil
|
||||||
else:
|
else:
|
||||||
writeln(stdout, "could not open: " & infile)
|
writeLine(stdout, "could not open: " & infile)
|
||||||
writeln(stdout, "Success!")
|
writeLine(stdout, "Success!")
|
||||||
call(3, # we use 3
|
call(3, # we use 3
|
||||||
12, # we use 12
|
12, # we use 12
|
||||||
43) # we use 43
|
43) # we use 43
|
||||||
|
|
|
||||||
|
|
@ -18,7 +18,7 @@ macro debug(n: varargs[expr]): stmt =
|
||||||
# add a call to the statement list that writes ": "
|
# add a call to the statement list that writes ": "
|
||||||
add(result, newCall("write", newIdentNode("stdout"), newStrLitNode(": ")))
|
add(result, newCall("write", newIdentNode("stdout"), newStrLitNode(": ")))
|
||||||
# add a call to the statement list that writes the expressions value:
|
# add a call to the statement list that writes the expressions value:
|
||||||
add(result, newCall("writeln", newIdentNode("stdout"), n[i]))
|
add(result, newCall("writeLine", newIdentNode("stdout"), n[i]))
|
||||||
|
|
||||||
var
|
var
|
||||||
a: array [0..10, int]
|
a: array [0..10, int]
|
||||||
|
|
|
||||||
|
|
@ -7,8 +7,8 @@ var
|
||||||
i: int
|
i: int
|
||||||
params = paramCount()
|
params = paramCount()
|
||||||
i = 0
|
i = 0
|
||||||
writeln(stdout, "This exe: " & getAppFilename())
|
writeLine(stdout, "This exe: " & getAppFilename())
|
||||||
writeln(stdout, "Number of parameters: " & $params)
|
writeLine(stdout, "Number of parameters: " & $params)
|
||||||
while i <= params:
|
while i <= params:
|
||||||
writeln(stdout, paramStr(i))
|
writeLine(stdout, paramStr(i))
|
||||||
i = i + 1
|
i = i + 1
|
||||||
|
|
|
||||||
|
|
@ -1,3 +1,3 @@
|
||||||
# test the new endian magic
|
# test the new endian magic
|
||||||
|
|
||||||
writeln(stdout, repr(system.cpuEndian))
|
writeLine(stdout, repr(system.cpuEndian))
|
||||||
|
|
|
||||||
|
|
@ -22,7 +22,7 @@ macro macrotest(n: expr): stmt {.immediate.} =
|
||||||
result = newNimNode(nnkStmtList, n)
|
result = newNimNode(nnkStmtList, n)
|
||||||
for i in 2..n.len-1:
|
for i in 2..n.len-1:
|
||||||
result.add(newCall("write", n[1], n[i]))
|
result.add(newCall("write", n[1], n[i]))
|
||||||
result.add(newCall("writeln", n[1], newStrLitNode("")))
|
result.add(newCall("writeLine", n[1], newStrLitNode("")))
|
||||||
|
|
||||||
macro debug(n: expr): stmt {.immediate.} =
|
macro debug(n: expr): stmt {.immediate.} =
|
||||||
let n = callsite()
|
let n = callsite()
|
||||||
|
|
@ -30,7 +30,7 @@ macro debug(n: expr): stmt {.immediate.} =
|
||||||
for i in 1..n.len-1:
|
for i in 1..n.len-1:
|
||||||
result.add(newCall("write", newIdentNode("stdout"), toStrLit(n[i])))
|
result.add(newCall("write", newIdentNode("stdout"), toStrLit(n[i])))
|
||||||
result.add(newCall("write", newIdentNode("stdout"), newStrLitNode(": ")))
|
result.add(newCall("write", newIdentNode("stdout"), newStrLitNode(": ")))
|
||||||
result.add(newCall("writeln", newIdentNode("stdout"), n[i]))
|
result.add(newCall("writeLine", newIdentNode("stdout"), n[i]))
|
||||||
|
|
||||||
macrotest(stdout, "finally", 4, 5, "variable", "argument lists")
|
macrotest(stdout, "finally", 4, 5, "variable", "argument lists")
|
||||||
macrotest(stdout)
|
macrotest(stdout)
|
||||||
|
|
@ -38,7 +38,7 @@ macrotest(stdout)
|
||||||
#GC_disable()
|
#GC_disable()
|
||||||
|
|
||||||
echo("This was compiled by Nim version " & system.NimVersion)
|
echo("This was compiled by Nim version " & system.NimVersion)
|
||||||
writeln(stdout, "Hello", " World", "!")
|
writeLine(stdout, "Hello", " World", "!")
|
||||||
|
|
||||||
echo(["a", "b", "c", "d"].len)
|
echo(["a", "b", "c", "d"].len)
|
||||||
for x in items(["What's", "your", "name", "?", ]):
|
for x in items(["What's", "your", "name", "?", ]):
|
||||||
|
|
|
||||||
|
|
@ -8,8 +8,8 @@ proc main() =
|
||||||
a, b: TTime
|
a, b: TTime
|
||||||
a = getLastModificationTime(paramStr(1))
|
a = getLastModificationTime(paramStr(1))
|
||||||
b = getLastModificationTime(paramStr(2))
|
b = getLastModificationTime(paramStr(2))
|
||||||
writeln(stdout, $a)
|
writeLine(stdout, $a)
|
||||||
writeln(stdout, $b)
|
writeLine(stdout, $b)
|
||||||
if a < b:
|
if a < b:
|
||||||
write(stdout, "$2 is newer than $1\n" % [paramStr(1), paramStr(2)])
|
write(stdout, "$2 is newer than $1\n" % [paramStr(1), paramStr(2)])
|
||||||
else:
|
else:
|
||||||
|
|
|
||||||
|
|
@ -24,10 +24,10 @@ var size = parseInt (paramStr (1))
|
||||||
var bit = 128
|
var bit = 128
|
||||||
var byteAcc = 0
|
var byteAcc = 0
|
||||||
|
|
||||||
stdout.writeln ("P4")
|
stdout.writeLine ("P4")
|
||||||
stdout.write ($size)
|
stdout.write ($size)
|
||||||
stdout.write (" ")
|
stdout.write (" ")
|
||||||
stdout.writeln ($size)
|
stdout.writeLine ($size)
|
||||||
|
|
||||||
var fsize = float (size)
|
var fsize = float (size)
|
||||||
for y in 0 .. size-1:
|
for y in 0 .. size-1:
|
||||||
|
|
|
||||||
|
|
@ -9,4 +9,4 @@ var
|
||||||
x = 1
|
x = 1
|
||||||
y = high(int)
|
y = high(int)
|
||||||
|
|
||||||
writeln(stdout, $ ( x +% y ) )
|
writeLine(stdout, $ ( x +% y ) )
|
||||||
|
|
|
||||||
|
|
@ -91,9 +91,9 @@ proc t64(i: int64) =
|
||||||
toVarNum64(i, b)
|
toVarNum64(i, b)
|
||||||
var x = toNum64(b)
|
var x = toNum64(b)
|
||||||
if x != i:
|
if x != i:
|
||||||
writeln(stdout, $i)
|
writeLine(stdout, $i)
|
||||||
writeln(stdout, toBinary(i))
|
writeLine(stdout, toBinary(i))
|
||||||
writeln(stdout, toBinary(x))
|
writeLine(stdout, toBinary(x))
|
||||||
|
|
||||||
proc t32(i: int32) =
|
proc t32(i: int32) =
|
||||||
var
|
var
|
||||||
|
|
@ -101,8 +101,8 @@ proc t32(i: int32) =
|
||||||
toVarNum(i, b)
|
toVarNum(i, b)
|
||||||
var x = toNum(b)
|
var x = toNum(b)
|
||||||
if x != i:
|
if x != i:
|
||||||
writeln(stdout, toBinary(i))
|
writeLine(stdout, toBinary(i))
|
||||||
writeln(stdout, toBinary(x))
|
writeLine(stdout, toBinary(x))
|
||||||
|
|
||||||
proc tm(i: int32) =
|
proc tm(i: int32) =
|
||||||
var
|
var
|
||||||
|
|
@ -110,8 +110,8 @@ proc tm(i: int32) =
|
||||||
toVarNum64(i, b)
|
toVarNum64(i, b)
|
||||||
var x = toNum(b)
|
var x = toNum(b)
|
||||||
if x != i:
|
if x != i:
|
||||||
writeln(stdout, toBinary(i))
|
writeLine(stdout, toBinary(i))
|
||||||
writeln(stdout, toBinary(x))
|
writeLine(stdout, toBinary(x))
|
||||||
|
|
||||||
t32(0)
|
t32(0)
|
||||||
t32(1)
|
t32(1)
|
||||||
|
|
@ -137,6 +137,6 @@ tm(100_000)
|
||||||
tm(low(int32))
|
tm(low(int32))
|
||||||
tm(high(int32))
|
tm(high(int32))
|
||||||
|
|
||||||
writeln(stdout, "Success!") #OUT Success!
|
writeLine(stdout, "Success!") #OUT Success!
|
||||||
|
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -9,7 +9,7 @@ type
|
||||||
|
|
||||||
proc getPoint( p: var TPoint2d) =
|
proc getPoint( p: var TPoint2d) =
|
||||||
{.breakpoint.}
|
{.breakpoint.}
|
||||||
writeln(stdout, p.x)
|
writeLine(stdout, p.x)
|
||||||
|
|
||||||
var
|
var
|
||||||
p: TPoint3d
|
p: TPoint3d
|
||||||
|
|
|
||||||
|
|
@ -16,7 +16,7 @@ type
|
||||||
TCircle = object of TFigure
|
TCircle = object of TFigure
|
||||||
radius: int
|
radius: int
|
||||||
|
|
||||||
proc drawCircle(my: var TCircle) = stdout.writeln("o " & $my.radius)
|
proc drawCircle(my: var TCircle) = stdout.writeLine("o " & $my.radius)
|
||||||
|
|
||||||
proc init(my: var TCircle) =
|
proc init(my: var TCircle) =
|
||||||
init(TFigure(my)) # call base constructor
|
init(TFigure(my)) # call base constructor
|
||||||
|
|
|
||||||
|
|
@ -11,9 +11,9 @@ var
|
||||||
a = high(int)
|
a = high(int)
|
||||||
b = -2
|
b = -2
|
||||||
try:
|
try:
|
||||||
writeln(stdout, b - a)
|
writeLine(stdout, b - a)
|
||||||
except OverflowError:
|
except OverflowError:
|
||||||
writeln(stdout, "the computation overflowed")
|
writeLine(stdout, "the computation overflowed")
|
||||||
|
|
||||||
{.pop.} # overflow check
|
{.pop.} # overflow check
|
||||||
#OUT the computation overflowed
|
#OUT the computation overflowed
|
||||||
|
|
|
||||||
|
|
@ -58,7 +58,7 @@ for x in low(TAZ) .. high(TAZ):
|
||||||
for x in low(TTokTypeRange) .. high(TTokTypeRange):
|
for x in low(TTokTypeRange) .. high(TTokTypeRange):
|
||||||
if x in tokTypes:
|
if x in tokTypes:
|
||||||
discard
|
discard
|
||||||
#writeln(stdout, "the token '$1' is in the set" % repr(x))
|
#writeLine(stdout, "the token '$1' is in the set" % repr(x))
|
||||||
|
|
||||||
#OUT Ha ein F ist in s!
|
#OUT Ha ein F ist in s!
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -2,6 +2,6 @@
|
||||||
|
|
||||||
proc main() =
|
proc main() =
|
||||||
for line in lines("thello.nim"):
|
for line in lines("thello.nim"):
|
||||||
writeln(stdout, line)
|
writeLine(stdout, line)
|
||||||
|
|
||||||
main()
|
main()
|
||||||
|
|
|
||||||
|
|
@ -4,10 +4,10 @@ import
|
||||||
parseopt
|
parseopt
|
||||||
|
|
||||||
proc writeHelp() =
|
proc writeHelp() =
|
||||||
writeln(stdout, "Usage: tparsopt [options] filename [options]")
|
writeLine(stdout, "Usage: tparsopt [options] filename [options]")
|
||||||
|
|
||||||
proc writeVersion() =
|
proc writeVersion() =
|
||||||
writeln(stdout, "Version: 1.0.0")
|
writeLine(stdout, "Version: 1.0.0")
|
||||||
|
|
||||||
var
|
var
|
||||||
filename = ""
|
filename = ""
|
||||||
|
|
@ -20,7 +20,7 @@ for kind, key, val in getopt():
|
||||||
of "help", "h": writeHelp()
|
of "help", "h": writeHelp()
|
||||||
of "version", "v": writeVersion()
|
of "version", "v": writeVersion()
|
||||||
else:
|
else:
|
||||||
writeln(stdout, "Unknown command line option: ", key, ": ", val)
|
writeLine(stdout, "Unknown command line option: ", key, ": ", val)
|
||||||
of cmdEnd: assert(false) # cannot happen
|
of cmdEnd: assert(false) # cannot happen
|
||||||
if filename == "":
|
if filename == "":
|
||||||
# no filename has been given, so we show the help:
|
# no filename has been given, so we show the help:
|
||||||
|
|
|
||||||
|
|
@ -981,7 +981,7 @@ iterator split*(s: string, sep: TPeg): string =
|
||||||
##
|
##
|
||||||
## .. code-block:: nim
|
## .. code-block:: nim
|
||||||
## for word in split("00232this02939is39an22example111", peg"\d+"):
|
## for word in split("00232this02939is39an22example111", peg"\d+"):
|
||||||
## writeln(stdout, word)
|
## writeLine(stdout, word)
|
||||||
##
|
##
|
||||||
## Results in:
|
## Results in:
|
||||||
##
|
##
|
||||||
|
|
@ -1682,7 +1682,7 @@ when isMainModule:
|
||||||
doAssert "ABC".match(peg"\d+ / \w+")
|
doAssert "ABC".match(peg"\d+ / \w+")
|
||||||
|
|
||||||
for word in split("00232this02939is39an22example111", peg"\d+"):
|
for word in split("00232this02939is39an22example111", peg"\d+"):
|
||||||
writeln(stdout, word)
|
writeLine(stdout, word)
|
||||||
|
|
||||||
doAssert matchLen("key", ident) == 3
|
doAssert matchLen("key", ident) == 3
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -9,8 +9,8 @@ when not defined(windows):
|
||||||
|
|
||||||
discard uname(u)
|
discard uname(u)
|
||||||
|
|
||||||
writeln(stdout, u.sysname)
|
writeLine(stdout, u.sysname)
|
||||||
writeln(stdout, u.nodename)
|
writeLine(stdout, u.nodename)
|
||||||
writeln(stdout, u.release)
|
writeLine(stdout, u.release)
|
||||||
writeln(stdout, u.machine)
|
writeLine(stdout, u.machine)
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -9,7 +9,7 @@ type
|
||||||
|
|
||||||
var val = {a, b}
|
var val = {a, b}
|
||||||
stdout.write(repr(val))
|
stdout.write(repr(val))
|
||||||
stdout.writeln(repr({'a'..'z', 'A'..'Z'}))
|
stdout.writeLine(repr({'a'..'z', 'A'..'Z'}))
|
||||||
|
|
||||||
type
|
type
|
||||||
TObj {.pure, inheritable.} = object
|
TObj {.pure, inheritable.} = object
|
||||||
|
|
|
||||||
|
|
@ -26,7 +26,7 @@ q[] = p
|
||||||
|
|
||||||
s = @[q, q, q, q]
|
s = @[q, q, q, q]
|
||||||
|
|
||||||
writeln(stdout, repr(p))
|
writeLine(stdout, repr(p))
|
||||||
writeln(stdout, repr(q))
|
writeLine(stdout, repr(q))
|
||||||
writeln(stdout, repr(s))
|
writeLine(stdout, repr(s))
|
||||||
writeln(stdout, repr(en4))
|
writeLine(stdout, repr(en4))
|
||||||
|
|
|
||||||
|
|
@ -6,7 +6,7 @@ for i in 0..80:
|
||||||
tab["key_" & $i] = "value" & $i
|
tab["key_" & $i] = "value" & $i
|
||||||
|
|
||||||
for key, val in pairs(tab):
|
for key, val in pairs(tab):
|
||||||
writeln(stdout, key, ": ", val)
|
writeLine(stdout, key, ": ", val)
|
||||||
writeln(stdout, "length of table ", $tab.len)
|
writeLine(stdout, "length of table ", $tab.len)
|
||||||
|
|
||||||
writeln(stdout, `%`("$key1 = $key2; ${PATH}", tab, {useEnvironment}))
|
writeLine(stdout, `%`("$key1 = $key2; ${PATH}", tab, {useEnvironment}))
|
||||||
|
|
|
||||||
|
|
@ -5,9 +5,9 @@ import
|
||||||
|
|
||||||
proc main(filter: string) =
|
proc main(filter: string) =
|
||||||
for filename in walkFiles(filter):
|
for filename in walkFiles(filter):
|
||||||
writeln(stdout, filename)
|
writeLine(stdout, filename)
|
||||||
|
|
||||||
for key, val in envPairs():
|
for key, val in envPairs():
|
||||||
writeln(stdout, key & '=' & val)
|
writeLine(stdout, key & '=' & val)
|
||||||
|
|
||||||
main("*.nim")
|
main("*.nim")
|
||||||
|
|
|
||||||
|
|
@ -15,10 +15,10 @@ var abclev = levB
|
||||||
|
|
||||||
template tstLev(abclev: TLev) =
|
template tstLev(abclev: TLev) =
|
||||||
bind tstempl.abclev, `%`
|
bind tstempl.abclev, `%`
|
||||||
writeln(stdout, "global = $1, arg = $2, test = $3" % [
|
writeLine(stdout, "global = $1, arg = $2, test = $3" % [
|
||||||
$tstempl.abclev, $abclev, $(tstempl.abclev == abclev)])
|
$tstempl.abclev, $abclev, $(tstempl.abclev == abclev)])
|
||||||
# evaluates to true, but must be false
|
# evaluates to true, but must be false
|
||||||
|
|
||||||
|
|
||||||
tstLev(levA)
|
tstLev(levA)
|
||||||
writeln(stdout, $abclev)
|
writeLine(stdout, $abclev)
|
||||||
|
|
|
||||||
|
|
@ -13,8 +13,8 @@ template withOpenFile(f: expr, filename: string, mode: TFileMode,
|
||||||
quit("cannot open for writing: " & filename)
|
quit("cannot open for writing: " & filename)
|
||||||
|
|
||||||
withOpenFile(txt, "ttempl3.txt", fmWrite):
|
withOpenFile(txt, "ttempl3.txt", fmWrite):
|
||||||
writeln(txt, "line 1")
|
writeLine(txt, "line 1")
|
||||||
txt.writeln("line 2")
|
txt.writeLine("line 2")
|
||||||
|
|
||||||
var
|
var
|
||||||
myVar: array[0..1, int]
|
myVar: array[0..1, int]
|
||||||
|
|
|
||||||
|
|
@ -137,11 +137,11 @@ proc doScenario(script: string, output: Stream, mode: TRunMode, verbose: bool):
|
||||||
if line.strip.len == 0: continue
|
if line.strip.len == 0: continue
|
||||||
|
|
||||||
if line.startsWith("#"):
|
if line.startsWith("#"):
|
||||||
output.writeln line
|
output.writeLine line
|
||||||
continue
|
continue
|
||||||
elif line.startsWith(">"):
|
elif line.startsWith(">"):
|
||||||
s.doCommand(line.substr(1).strip)
|
s.doCommand(line.substr(1).strip)
|
||||||
output.writeln line, "\n", if verbose: s.lastOutput else: ""
|
output.writeLine line, "\n", if verbose: s.lastOutput else: ""
|
||||||
else:
|
else:
|
||||||
var expectMatch = true
|
var expectMatch = true
|
||||||
var pattern = s.replaceVars(line)
|
var pattern = s.replaceVars(line)
|
||||||
|
|
@ -153,9 +153,9 @@ proc doScenario(script: string, output: Stream, mode: TRunMode, verbose: bool):
|
||||||
s.lastOutput.find(re(pattern, flags = {reStudy})) != -1
|
s.lastOutput.find(re(pattern, flags = {reStudy})) != -1
|
||||||
|
|
||||||
if expectMatch == actualMatch:
|
if expectMatch == actualMatch:
|
||||||
output.writeln "SUCCESS ", line
|
output.writeLine "SUCCESS ", line
|
||||||
else:
|
else:
|
||||||
output.writeln "FAILURE ", line
|
output.writeLine "FAILURE ", line
|
||||||
result = false
|
result = false
|
||||||
|
|
||||||
iterator caasTestsRunner*(filter = "", verbose = false): tuple[test,
|
iterator caasTestsRunner*(filter = "", verbose = false): tuple[test,
|
||||||
|
|
|
||||||
|
|
@ -138,7 +138,7 @@ proc generateHtml*(filename: string, commit: int; onlyFailing: bool) =
|
||||||
# generate navigation:
|
# generate navigation:
|
||||||
outfile.write("""<ul id="tabs">""")
|
outfile.write("""<ul id="tabs">""")
|
||||||
for m in db.rows(sql"select id, name, os, cpu from Machine order by id"):
|
for m in db.rows(sql"select id, name, os, cpu from Machine order by id"):
|
||||||
outfile.writeln """<li><a href="#$#">$#: $#, $#</a></li>""" % m
|
outfile.writeLine """<li><a href="#$#">$#: $#, $#</a></li>""" % m
|
||||||
outfile.write("</ul>")
|
outfile.write("</ul>")
|
||||||
|
|
||||||
for currentMachine in db.rows(sql"select id from Machine order by id"):
|
for currentMachine in db.rows(sql"select id from Machine order by id"):
|
||||||
|
|
@ -195,7 +195,7 @@ proc generateJson*(filename: string, commit: int) =
|
||||||
let machine = $backend.getMachine(db)
|
let machine = $backend.getMachine(db)
|
||||||
let data = db.getRow(sql(selRow), lastCommit, machine)
|
let data = db.getRow(sql(selRow), lastCommit, machine)
|
||||||
|
|
||||||
outfile.writeln("""{"total": $#, "passed": $#, "skipped": $#""" % data)
|
outfile.writeLine("""{"total": $#, "passed": $#, "skipped": $#""" % data)
|
||||||
|
|
||||||
let results = newJArray()
|
let results = newJArray()
|
||||||
for row in db.rows(sql(selResults), lastCommit):
|
for row in db.rows(sql(selResults), lastCommit):
|
||||||
|
|
@ -208,7 +208,7 @@ proc generateJson*(filename: string, commit: int) =
|
||||||
obj["expected"] = %row[5]
|
obj["expected"] = %row[5]
|
||||||
obj["given"] = %row[6]
|
obj["given"] = %row[6]
|
||||||
results.add(obj)
|
results.add(obj)
|
||||||
outfile.writeln(""", "results": """)
|
outfile.writeLine(""", "results": """)
|
||||||
outfile.write(results.pretty)
|
outfile.write(results.pretty)
|
||||||
|
|
||||||
if not previousCommit.isNil:
|
if not previousCommit.isNil:
|
||||||
|
|
@ -220,9 +220,9 @@ proc generateJson*(filename: string, commit: int) =
|
||||||
obj["old"] = %row[1]
|
obj["old"] = %row[1]
|
||||||
obj["new"] = %row[2]
|
obj["new"] = %row[2]
|
||||||
diff.add obj
|
diff.add obj
|
||||||
outfile.writeln(""", "diff": """)
|
outfile.writeLine(""", "diff": """)
|
||||||
outfile.writeln(diff.pretty)
|
outfile.writeLine(diff.pretty)
|
||||||
|
|
||||||
outfile.writeln "}"
|
outfile.writeLine "}"
|
||||||
close(db)
|
close(db)
|
||||||
close(outfile)
|
close(outfile)
|
||||||
|
|
|
||||||
|
|
@ -4,6 +4,6 @@ discard """
|
||||||
|
|
||||||
proc f(x: varargs[string, `$`]) = discard
|
proc f(x: varargs[string, `$`]) = discard
|
||||||
template optF{f(x)}(x: varargs[expr]) =
|
template optF{f(x)}(x: varargs[expr]) =
|
||||||
writeln(stdout, x)
|
writeLine(stdout, x)
|
||||||
|
|
||||||
f 1, 2, false, 3, "ha"
|
f 1, 2, false, 3, "ha"
|
||||||
|
|
|
||||||
|
|
@ -7,13 +7,13 @@ discard """
|
||||||
|
|
||||||
template optWrite{
|
template optWrite{
|
||||||
write(f, x)
|
write(f, x)
|
||||||
((write|writeln){w})(f, y)
|
((write|writeLine){w})(f, y)
|
||||||
}(x, y: varargs[expr], f, w: expr) =
|
}(x, y: varargs[expr], f, w: expr) =
|
||||||
w(f, "|", x, y, "|")
|
w(f, "|", x, y, "|")
|
||||||
|
|
||||||
if true:
|
if true:
|
||||||
echo "0"
|
echo "0"
|
||||||
write stdout, "1"
|
write stdout, "1"
|
||||||
writeln stdout, "2"
|
writeLine stdout, "2"
|
||||||
write stdout, "3"
|
write stdout, "3"
|
||||||
echo "4"
|
echo "4"
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue