summary refs log tree commit diff stats
path: root/tests/seq
diff options
context:
space:
mode:
Diffstat (limited to 'tests/seq')
-rw-r--r--tests/seq/tseq2.nim11
-rw-r--r--tests/seq/tseqcon.nim51
-rw-r--r--tests/seq/tseqcon2.nim9
-rw-r--r--tests/seq/tseqtuple.nim28
-rw-r--r--tests/seq/tsequtils.nim55
-rw-r--r--tests/seq/tshallowseq.nim17
-rw-r--r--tests/seq/ttoseq.nim18
7 files changed, 0 insertions, 189 deletions
diff --git a/tests/seq/tseq2.nim b/tests/seq/tseq2.nim
deleted file mode 100644
index 5de9402ec..000000000
--- a/tests/seq/tseq2.nim
+++ /dev/null
@@ -1,11 +0,0 @@
-proc `*` *(a, b: seq[int]): seq[int] =
-  # allocate a new sequence:
-  newSeq(result, len(a))
-  # multiply two int sequences:
-  for i in 0..len(a)-1: result[i] = a[i] * b[i]
-
-when isMainModule:
-  # test the new ``*`` operator for sequences:
-  assert(@[1, 2, 3] * @[1, 2, 3] == @[1, 4, 9])
-
-
diff --git a/tests/seq/tseqcon.nim b/tests/seq/tseqcon.nim
deleted file mode 100644
index 902ac3485..000000000
--- a/tests/seq/tseqcon.nim
+++ /dev/null
@@ -1,51 +0,0 @@
-discard """
-  file: "tseqcon.nim"
-  output: "Hithere, what\'s your name?Hathere, what\'s your name?"
-"""
-# Test the add proc for sequences and strings
-
-const
-  nestedFixed = true
-
-type
-  TRec {.final.} = object
-    x, y: int
-    s: string
-    seq: seq[string]
-  TRecSeq = seq[TRec]
-
-proc test() =
-  var s, b: seq[string]
-  s = @[]
-  add(s, "Hi")
-  add(s, "there, ")
-  add(s, "what's your name?")
-
-  b = s # deep copying here!
-  b[0][1] = 'a'
-
-  for i in 0 .. len(s)-1:
-    write(stdout, s[i])
-  for i in 0 .. len(b)-1:
-    write(stdout, b[i])
-
-
-when nestedFixed:
-  proc nested() =
-    var
-      s: seq[seq[string]]
-    for i in 0..10_000: # test if the garbage collector
-      # now works with sequences
-      s = @[
-        @["A", "B", "C", "D"],
-        @["E", "F", "G", "H"],
-        @["I", "J", "K", "L"],
-        @["M", "N", "O", "P"]]
-
-test()
-when nestedFixed:
-  nested()
-
-#OUT Hithere, what's your name?Hathere, what's your name?
-
-
diff --git a/tests/seq/tseqcon2.nim b/tests/seq/tseqcon2.nim
deleted file mode 100644
index 4f2763ffe..000000000
--- a/tests/seq/tseqcon2.nim
+++ /dev/null
@@ -1,9 +0,0 @@
-import os
-
-proc rec_dir(dir: string): seq[string] =
-  result = @[]
-  for kind, path in walk_dir(dir):
-    if kind == pcDir:
-      add(result, rec_dir(path))
-    else:
-      add(result, path)
diff --git a/tests/seq/tseqtuple.nim b/tests/seq/tseqtuple.nim
deleted file mode 100644
index a0102c9ef..000000000
--- a/tests/seq/tseqtuple.nim
+++ /dev/null
@@ -1,28 +0,0 @@
-discard """
-  file: "tseqtuple.nim"
-  output: "fA13msg1falsefB14msg2truefC15msg3false"
-"""
-
-type
-  TMsg = tuple[
-    file: string,
-    line: int,
-    msg: string,
-    err: bool]
-
-var s: seq[TMsg] = @[]
-
-s.add(("fA", 13, "msg1", false))
-s.add(("fB", 14, "msg2", true))
-s.add(("fC", 15, "msg3", false))
-
-for file, line, msg, err in items(s):
-  stdout.write(file)
-  stdout.write($line)
-  stdout.write(msg)
-  stdout.write($err)
-
-#OUT fA13msg1falsefB14msg2truefC15msg3false
-
-
-
diff --git a/tests/seq/tsequtils.nim b/tests/seq/tsequtils.nim
deleted file mode 100644
index ea85a7f21..000000000
--- a/tests/seq/tsequtils.nim
+++ /dev/null
@@ -1,55 +0,0 @@
-discard """
-file: "tsequtils.nim"
-output: '''Zip: [{"Field0": 1, "Field1": 2}, {"Field0": 3, "Field1": 4}, {"Field0": 5, "Field1": 6}]
-Filter Iterator: 3
-Filter Iterator: 5
-Filter Iterator: 7
-Filter: [3, 5, 7]
-FilterIt: [1, 3, 7]
-Concat: [1, 3, 5, 7, 2, 4, 6]
-Deduplicate: [1, 2, 3, 4, 5, 7]'''
-
-"""
-
-import sequtils, marshal
-
-proc testFindWhere(item : int) : bool =
-  if item != 1: return true
-
-var seq1: seq[int] = @[]
-
-seq1.add(1)
-seq1.add(3)
-seq1.add(5)
-seq1.add(7)
-
-var seq2: seq[int] = @[2, 4, 6]
-var final = zip(seq1, seq2)
-
-echo "Zip: ", $$(final)
-
-#Test findWhere as a iterator
-
-for itms in filter(seq1, testFindWhere):
-  echo "Filter Iterator: ", $$(itms)
-
-
-#Test findWhere as a proc
-
-var fullseq: seq[int] = filter(seq1, testFindWhere)
-
-echo "Filter: ", $$(fullseq)
-
-#Test findIt as a template
-
-var finditval: seq[int] = filterIt(seq1, it!=5)
-
-echo "FilterIt: ", $$(finditval)
-
-var concatseq = concat(seq1,seq2)
-echo "Concat: ", $$(concatseq)
-
-var seq3 = @[1,2,3,4,5,5,5,7]
-var dedupseq = deduplicate(seq3)
-echo "Deduplicate: ", $$(dedupseq)
-
diff --git a/tests/seq/tshallowseq.nim b/tests/seq/tshallowseq.nim
deleted file mode 100644
index 9a8bdb954..000000000
--- a/tests/seq/tshallowseq.nim
+++ /dev/null
@@ -1,17 +0,0 @@
-discard """
-  output: '''@[1, 42, 3]
-@[1, 42, 3]
-'''
-"""
-proc xxx() =
-  var x: seq[int] = @[1, 2, 3]
-  var y: seq[int]
-
-  system.shallowCopy(y, x)
-
-  y[1] = 42
-
-  echo y
-  echo x
-
-xxx()
diff --git a/tests/seq/ttoseq.nim b/tests/seq/ttoseq.nim
deleted file mode 100644
index 33de59538..000000000
--- a/tests/seq/ttoseq.nim
+++ /dev/null
@@ -1,18 +0,0 @@
-discard """
-  output: "2345623456"
-"""
-
-import sequtils
-
-for x in toSeq(countup(2, 6)):
-  stdout.write(x)
-for x in items(toSeq(countup(2, 6))):
-  stdout.write(x)
-
-import strutils
-
-var y: type("a b c".split)
-y = "xzy"
-
-
-