fbi.icl 816 Bytes
Newer Older
Diederik van Arkel's avatar
Diederik van Arkel committed
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
implementation module fbi

import StdString
import StdId, PmParse
import ExtListBox

:: FindBoxInfo p =
	{ dlogId	:: !Id
	, intrId	:: !Id
	, msgId		:: !Id
	, findId	:: !Id
	, closeId	:: !Id
	, stringId	:: !Id
	, kind		:: !SearchKind
	, type		:: !SearchType
	, is_searching	:: !Bool			// currently searching?
	, cleanid	:: ![String]
	, verb		:: !Bool
	, export_	:: !Bool
	, windId	:: !Id
	, windlbId	:: !ExtListBoxId p
	, src_offset	:: !Vector2
	, src_font		:: !Font
	, src_forg		:: !Colour
	, src_back		:: !Colour
	, src_size		:: !Size
	, pathname		:: !String
	, recvId		:: !RId Bool
	}

:: SearchType = SearchPaths | SearchImports | SearchProject

instance == SearchType
where
	(==) SearchPaths SearchPaths = True
	(==) SearchImports SearchImports = True
	(==) SearchProject SearchProject = True
	(==) _ _ = False