Guest User

Untitled

a guest
Jun 14th, 2014
244
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.73 KB | None | 0 0
  1. type
  2. TPerson = object of TObject
  3. name: string
  4.  
  5. TStudent = object of TPerson
  6. id: int
  7.  
  8. method toString1(self: TPerson): string =
  9. return self.name
  10.  
  11. method toString1(self: TStudent): string =
  12. return self.name & " " & $self.id
  13.  
  14. method toString2(self: var TPerson): string =
  15. return self.name
  16.  
  17. method toString2(self: var TStudent): string =
  18. return self.name & " " & $self.id
  19.  
  20.  
  21. var a: TPerson
  22. a = TStudent(name: "Anton", id: 100)
  23. assert(a.toString1() == "Anton 100") # not ok (id is a random number)
  24. assert(a.toString2() == "Anton 100") # not ok (id is a random number)
  25.  
  26. var b: TStudent
  27. b = TStudent(name: "Anton", id: 100)
  28. assert(b.toString1() == "Anton 100") # ok
  29. assert(b.toString2() == "Anton 100") # ok
Advertisement
Add Comment
Please, Sign In to add comment