Nim/tests/tisopr.nim
2010-02-14 00:29:35 +01:00

20 lines
264 B
Nim

# Test is operator
type
TMyType = object
len: int
data: string
TOtherType = object of TMyType
proc p(x: TMyType): bool =
return x is TOtherType
var
m: TMyType
n: TOtherType
write(stdout, p(m))
write(stdout, p(n))
#OUT falsetrue