objects with no ancestor are not implicitely final

lib/pure/pegs.nim

@@ -1057,7 +1057,7 @@ type
     charset: set[char]       ## if kind == tkCharSet
     index: int               ## if kind == tkBackref
   
-  TPegLexer = object          ## the lexer object.
+  TPegLexer {.inheritable.} = object          ## the lexer object.
     bufpos: int               ## the current position within the buffer
     buf: cstring              ## the buffer itself
     LineNumber: int           ## the current line number

lib/pure/xmldom.nim

@@ -58,7 +58,7 @@ type
     Features: seq[Feature] # Read-Only
 
   PNode* = ref Node
-  Node = object
+  Node = object of TObject
     attributes*: seq[PAttr]
     childNodes*: seq[PNode]
     FLocalName: string # Read-only