Mercurial > ~dholland > hg > ag > index.cgi

comparison anagram/guisupport/tracedc.cpp @ 0:13d2b8934445

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import AnaGram (near-)release tree into Mercurial.
author David A. Holland
date Sat, 22 Dec 2007 17:52:45 -0500
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:13d2b8934445
1 /*
2 * AnaGram, A System for Syntax Directed Programming
3 * Copyright 1993-2002 Parsifal Software. All Rights Reserved.
4 * See the file COPYING for license and usage terms.
5 *
6 * tracedc.cpp
7 */
8
9 #include "dc.h"
10 #include "tracedc.h"
11
12 //#define INCLUDE_LOGGING
13 #include "log.h"
14
15
16 void trace_window_dc::init(void) {
17 LOGSECTION("trace_window_dc::init");
18
19 des->d_size = cint(0, parser_stack->nt);
20 des->c_loc_doc.y = parser_stack->nt - 1;
21 menu = NULL;
22
23 look_ahead = 0;
24 }
25
26 trace_window_dc::trace_window_dc(AgString name, tsd *st,
27 unsigned sn, unsigned t, unsigned f)
28 : dc(name, AgString(AgString::format(" S%03d:R%03d:T%03d ", sn, f, t)))
29 , parser_stack(copy_tuple_set(st))
30 {
31 init();
32 }
33
34 trace_window_dc::trace_window_dc(AgString name, tsd *et)
35 : dc(name)
36 , parser_stack(copy_tuple_set(et))
37 {
38 LOGSECTION("trace_window_dc::trace_window_dc::(AgString, tsd *)");
39 init();
40 }
41
42 trace_window_dc::trace_window_dc(AgString name, AgString foot, tsd *et)
43 : dc(name, foot)
44 , parser_stack(copy_tuple_set(et))
45 {
46 init();
47 }