Initial import

tests/tassign.nim

@@ -0,0 +1,34 @@
+# Test the assignment operator for complex types which need RTTI
+
+import
+  io
+
+type
+  TRec = record
+    x, y: int
+    s: string
+    seq: seq[string]
+    arr: seq[seq[array[0..3, string]]]
+  TRecSeq = seq[TRec]
+
+proc test() =
+  var
+    a, b: TRec
+  a.x = 1
+  a.y = 2
+  a.s = "Hallo!"
+  a.seq = ["abc", "def", "ghi", "jkl"]
+  a.arr = []
+  setLength(a.arr, 4)
+  a.arr[0] = []
+  a.arr[1] = []
+
+  b = a # perform a deep copy here!
+  b.seq = ["xyz", "huch", "was", "soll"]
+  writeln(stdout, length(a.seq))
+  writeln(stdout, a.seq[3])
+  writeln(stdout, length(b.seq))
+  writeln(stdout, b.seq[3])
+  writeln(stdout, b.y)
+
+test()