Property definitions

nitc :: lexer $ TBadString :: init_tk
    init init_tk(loc: Location)
    do
		_location = loc
    end
src/parser/lexer.nit:1335,5--1338,7