new tester; all tests categorized
This commit is contained in:
parent
51ee524109
commit
20b5f31c03
481 changed files with 794 additions and 2506 deletions
21
tests/object/tobject2.nim
Normal file
21
tests/object/tobject2.nim
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
# Tests the object implementation
|
||||
|
||||
type
|
||||
TPoint2d {.inheritable.} = object
|
||||
x, y: int
|
||||
|
||||
TPoint3d = object of TPoint2d
|
||||
z: int # added a field
|
||||
|
||||
proc getPoint( p: var TPoint2d) =
|
||||
{.breakpoint.}
|
||||
writeln(stdout, p.x)
|
||||
|
||||
var
|
||||
p: TPoint3d
|
||||
|
||||
TPoint2d(p).x = 34
|
||||
p.y = 98
|
||||
p.z = 343
|
||||
|
||||
getPoint(p)
|
||||
Loading…
Add table
Add a link
Reference in a new issue