|
|
|
@ -27,7 +27,8 @@
|
|
|
|
#:line (line lexeme-start)
|
|
|
|
#:line (line lexeme-start)
|
|
|
|
#:column (+ (col lexeme-start) 2)
|
|
|
|
#:column (+ (col lexeme-start) 2)
|
|
|
|
#:position (+ (pos lexeme-start) 2)
|
|
|
|
#:position (+ (pos lexeme-start) 2)
|
|
|
|
#:span (- (span lexeme-start lexeme-end) 4))]
|
|
|
|
#:span (- (pos lexeme-end)
|
|
|
|
|
|
|
|
(pos lexeme-start) 4))]
|
|
|
|
[any-char (token 'CHAR-TOK lexeme
|
|
|
|
[any-char (token 'CHAR-TOK lexeme
|
|
|
|
#:line (line lexeme-start)
|
|
|
|
#:line (line lexeme-start)
|
|
|
|
#:column (col lexeme-start)
|
|
|
|
#:column (col lexeme-start)
|
|
|
|
|
