forked from livecode/livecode
-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathparser.livecodescript
More file actions
45 lines (37 loc) · 1.45 KB
/
Copy pathparser.livecodescript
File metadata and controls
45 lines (37 loc) · 1.45 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
script "TestLCSParser"
/*
Copyright (C) 2017 LiveCode Ltd.
This file is part of LiveCode.
LiveCode is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License v3 as published by the Free
Software Foundation.
LiveCode is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
You should have received a copy of the GNU General Public License
along with LiveCode. If not see <http://www.gnu.org/licenses/>. */
/* TODO 15/05/2017: Turn these tests into an LCS parser test when merging
up into develop branch */
private command __CompileCheck pMessage
local tCompileTest, tCompileResult
--checks to see if the message compiles
lock messages
create script only stack "compilationTest"
put "on compileTest" & return & pMessage & return \
& "end compileTest" into tCompileTest
set the script of stack "compilationTest" to tCompileTest
put the result into tCompileResult
delete stack "compilationTest"
unlock messages
repeat for each line tError in tCompileResult
if item 2 of tError is not 0 then
return tError
end if
end repeat
return empty
end __CompileCheck
on TestBug19688
__CompileCheck "get the width"
TestAssert "'get the <objprop>' parse error", the result is not empty
end TestBug19688