warrence
/
pret-pas
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

- Updated find pattern

This commit is contained in:
Stefan Müller 2010-09-30 12:02:22 +02:00
parent b756c08f2e
commit 8eba6d450c
2 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pret-pas.lua
View File

@ -99,7 +99,7 @@ function visualizer.flush_line(str, nested)
--state = buffers.changestate(1, state) --state = buffers.changestate(1, state)
for c in string.utfcharacters(str) do for c in string.utfcharacters(str) do
if string.find(c, "^[%a%_]$") then if string.find(c, "^[%a_]$") then
-- char belongs to identifier -- char belongs to identifier
if word then if word then
word = word .. c word = word .. c
@ -140,7 +140,7 @@ function visualizer.flush_line(str, nested)
end end
flush_pas_word(word) flush_pas_word(word)
word = nil word = nil
--[[ --[[
local code, comment = string.match(str,"^(.-)%-%-%[%[(.*)$") local code, comment = string.match(str,"^(.-)%-%-%[%[(.*)$")
if comment then if comment then

4
test-file/pret-pas_test.tex
View File

@ -24,7 +24,9 @@ end;
\startPAS \startPAS
My_Variable := _Variable; My_Variable := _Variable;
aaa asm for end For END
aaa aSM foR eNd For END
45My_Variable := _Variable45; 45My_Variable := _Variable45;
&for &for asm blub
\stopPAS \stopPAS
\stoptext \stoptext