diff options
Diffstat (limited to 'nim/highlite.pas')
-rwxr-xr-x[-rw-r--r--] | nim/highlite.pas | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/nim/highlite.pas b/nim/highlite.pas index 1867268d3..ec5374663 100644..100755 --- a/nim/highlite.pas +++ b/nim/highlite.pas @@ -134,14 +134,19 @@ end; procedure initGeneralTokenizer(var g: TGeneralTokenizer; const buf: string); +var + pos: int; begin {@ignore} fillChar(g, sizeof(g), 0); {@emit} g.buf := PChar(buf); g.kind := low(TTokenClass); g.start := 0; g.len := 0; - g.pos := 0; g.state := low(TTokenClass); + pos := 0; + // skip initial whitespace: + while g.buf[pos] in [' ', #9..#13] do inc(pos); + g.pos := pos; end; procedure deinitGeneralTokenizer(var g: TGeneralTokenizer); |