let lex loc cs = gram.glexer loc cs