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
47
48
49
50
51
52
53
54
55
56
57
58
59
|
PolyML.Compiler.reportUnreferencedIds := true;
use "Base";
use "Globals";
use "LocaleBase";
use "Locale";
use "Resource";
use "WinBase";
use "ComboBase";
use "ScrollBase";
use "MenuBase";
use "MESSAGE.signature";
use "Message";
use "Class";
use "FlagPrint";
use "Window";
use "ComboBox";
use "Edit";
use "ListBox";
use "Scrollbar";
use "Static";
use "Button";
use "Dialog";
use "Cursor";
use "Icon";
use "Menu";
use "GdiBase";
use "Color";
use "FontBase";
use "Font";
use "DeviceBase";
use "Bitmap";
use "Brush";
use "Pen";
use "DeviceContext";
use "CommonDialog";
use "MessageBox";
use "Caret";
use "Transform";
use "Metafile";
use "Clipboard";
use "Rectangle";
use "Printing";
use "Line";
use "Path";
use "Region";
use "Painting";
use "Shape";
use "Clipping";
use "DragDrop";
use "Keyboard";
use "Mouse";
use "WinSystem";
use "CommonControls";
List.app PolyML.Compiler.forgetStructure
[ "Base", "ComboBase", "FontBase", "MenuBase", "ScrollBase", "WinBase",
"MessageBase", "GdiBase", "DeviceBase", "LocaleBase" ];
List.app PolyML.Compiler.forgetFunctor ["FlagPrint"];
|
