+redef class TExternCodeSegment
+ redef fun parser_index: Int
+ do
+ return 112
+ end
+
+ init init_tk(loc: Location)
+ do
+ _location = loc
+ end
+end
+
+redef class TBadExtern
+ redef fun parser_index: Int
+ do
+ return 113
+ end
+
+ init init_tk(loc: Location)
+ do
+ _location = loc
+ end
+end
+