This repository was archived by the owner on Aug 31, 2021. It is now read-only.
-
Notifications
You must be signed in to change notification settings - Fork 226
Expand file tree
/
Copy pathtype.lcb
More file actions
46 lines (35 loc) · 1.69 KB
/
type.lcb
File metadata and controls
46 lines (35 loc) · 1.69 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
46
/*
Copyright (C) 2015 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/>. */
module com.livecode.type.tests
public handler TestDefaultNothing()
variable tNothing as optional Boolean
test "optional default is nothing" when tNothing is nothing
variable tNotNothing as Boolean
put false into tNotNothing
test "non-optional is not nothing" when tNotNothing is not nothing
end handler
public handler TestNothingComparisons()
variable tLeftNothing as optional Boolean
variable tRightNothing as optional Boolean
test "nothing is nothing" when tLeftNothing is tRightNothing
test "not (nothing is nothing)" when not (tLeftNothing is not tRightNothing)
variable tLeftNotNothing as optional Boolean
variable tRightNotNothing as optional Boolean
put false into tLeftNotNothing
put false into tRightNotNothing
test "nothing is not something" when tLeftNothing is not tRightNotNothing
test "not (nothing is something)" when not (tLeftNothing is tRightNotNothing)
test "something is not nothing" when tLeftNotNothing is not tRightNothing
test "not (something is nothing)" when not (tLeftNotNothing is tRightNothing)
end handler
end module