equal
deleted
inserted
replaced
7 *) |
7 *) |
8 |
8 |
9 use "thy_scan.ML"; |
9 use "thy_scan.ML"; |
10 use "thy_parse.ML"; |
10 use "thy_parse.ML"; |
11 use "thy_syn.ML"; |
11 use "thy_syn.ML"; |
|
12 |
12 use "thy_info.ML"; |
13 use "thy_info.ML"; |
13 use "browser_info.ML"; |
14 use "browser_info.ML"; |
14 use "thm_database.ML"; |
15 use "thm_database.ML"; |
|
16 |
15 use "symbol_input.ML"; |
17 use "symbol_input.ML"; |
16 use "thy_read.ML"; |
18 use "thy_read.ML"; |
17 |
19 |
18 open ThmDB ReadThy ThyInfo BrowserInfo SymbolInput; |
20 open ThmDB ThyRead ThyInfo BrowserInfo SymbolInput; |
19 |
21 |
20 structure ThySyn = ThySynFun(val user_keywords = [] and user_sections = []); |
|
21 set_parser ThySyn.parse; |
|
22 |
22 |
23 (* FIXME tmp *) |
23 (* FIXME tmp *) |
24 |
24 |
25 fun set_session s = |
25 fun set_session s = |
26 writeln ("This is the " ^ quote s ^ " session."); |
26 writeln ("This is the " ^ quote s ^ " session."); |