Hello Russell!
arg = -G
arg[1:2] = -
case - 
flagp = G
arg = -i
arg[1:2] = -
case - 
flagp = i
arg = simp0001.r
arg[1:2] = s
2nd default
arg_cnt = 1
ifname = 
ofname = 
sigfname = 
optfname = 
arg = simp0001.out
arg[1:2] = s
2nd default
arg_cnt = 2
ifname = simp0001.r
ofname = 
sigfname = 
optfname = 
INFO: stt enter stt id = ?
INFO: stt path 1
INFO: stt path 1 sttnstrings = 2
INFO: stt enter stt id = +=
INFO: stt path 1
INFO: stt path 1 sttnstrings = 3
INFO: stt enter stt id = -=
INFO: stt path 1
INFO: stt path 1 sttnstrings = 4
INFO: stt enter stt id = :=
INFO: stt path 1
INFO: stt path 1 sttnstrings = 5
INFO: stt enter stt id = or
INFO: stt path 1
INFO: stt path 1 sttnstrings = 6
INFO: stt enter stt id = and
INFO: stt path 1
INFO: stt path 1 sttnstrings = 7
INFO: stt enter stt id = not
INFO: stt path 1
INFO: stt path 1 sttnstrings = 8
INFO: stt enter stt id = :=
INFO: stt path 2
INFO: stt path 2 it = 5
INFO: stt enter stt id = <
INFO: stt path 1
INFO: stt path 1 sttnstrings = 9
INFO: stt enter stt id = <:=
INFO: stt path 1
INFO: stt path 1 sttnstrings = 10
INFO: stt enter stt id = >:=
INFO: stt path 1
INFO: stt path 1 sttnstrings = 11
INFO: stt enter stt id = <>
INFO: stt path 1
INFO: stt path 1 sttnstrings = 12
INFO: stt enter stt id = >
INFO: stt path 1
INFO: stt path 1 sttnstrings = 13
INFO: stt enter stt id = +
INFO: stt path 1
INFO: stt path 1 sttnstrings = 14
INFO: stt enter stt id = -
INFO: stt path 1
INFO: stt path 1 sttnstrings = 15
INFO: stt enter stt id = *
INFO: stt path 1
INFO: stt path 1 sttnstrings = 16
INFO: stt enter stt id = /
INFO: stt path 1
INFO: stt path 1 sttnstrings = 17
INFO: stt enter stt id = %
INFO: stt path 1
INFO: stt path 1 sttnstrings = 18
INFO: stt enter stt id = ^+
INFO: stt path 1
INFO: stt path 1 sttnstrings = 19
INFO: stt enter stt id = ^*
INFO: stt path 1
INFO: stt path 1 sttnstrings = 20
INFO: stt enter stt id = **
INFO: stt path 1
INFO: stt path 1 sttnstrings = 21
INFO: stt enter stt id = ^
INFO: stt path 1
INFO: stt path 1 sttnstrings = 22
INFO: stt enter stt id = .
INFO: stt path 1
INFO: stt path 1 sttnstrings = 23
INFO: stt enter stt id = New
INFO: stt path 1
INFO: stt path 1 sttnstrings = 24
INFO: stt enter stt id = ptr_New
INFO: stt path 1
INFO: stt path 1 sttnstrings = 25
INFO: stt enter stt id = init_New
INFO: stt path 1
INFO: stt path 1 sttnstrings = 26
INFO: stt enter stt id = V
INFO: stt path 1
INFO: stt path 1 sttnstrings = 27
INFO: stt enter stt id = First
INFO: stt path 1
INFO: stt path 1 sttnstrings = 28
INFO: stt enter stt id = Last
INFO: stt path 1
INFO: stt path 1 sttnstrings = 29
INFO: stt enter stt id = Pred
INFO: stt path 1
INFO: stt path 1 sttnstrings = 30
INFO: stt enter stt id = Succ
INFO: stt path 1
INFO: stt path 1 sttnstrings = 31
INFO: stt enter stt id = Ord
INFO: stt path 1
INFO: stt path 1 sttnstrings = 32
INFO: stt enter stt id = OrdInv
INFO: stt path 1
INFO: stt path 1 sttnstrings = 33
INFO: stt enter stt id = Card
INFO: stt path 1
INFO: stt path 1 sttnstrings = 34
INFO: stt enter stt id = In
INFO: stt path 1
INFO: stt path 1 sttnstrings = 35
INFO: stt enter stt id = Out
INFO: stt path 1
INFO: stt path 1 sttnstrings = 36
INFO: stt enter stt id = Boolean
INFO: stt path 1
INFO: stt path 1 sttnstrings = 37
INFO: stt enter stt id = True
INFO: stt path 1
INFO: stt path 1 sttnstrings = 38
INFO: stt enter stt id = False
INFO: stt path 1
INFO: stt path 1 sttnstrings = 39
INFO: stt enter stt id = Short
INFO: stt path 1
INFO: stt path 1 sttnstrings = 40
INFO: stt enter stt id = Void
INFO: stt path 1
INFO: stt path 1 sttnstrings = 41
INFO: stt enter stt id = Array
INFO: stt path 1
INFO: stt path 1 sttnstrings = 42
INFO: stt enter stt id = put
INFO: stt path 1
INFO: stt path 1 sttnstrings = 43
INFO: stt enter stt id = Callcc
INFO: stt path 1
INFO: stt path 1 sttnstrings = 44
INFO: stt enter stt id = size
INFO: stt path 1
INFO: stt path 1 sttnstrings = 45
INFO: stt enter stt id = ''
INFO: stt path 1
INFO: stt path 1 sttnstrings = 46
INFO: stt enter stt id = simple
INFO: stt path 1
INFO: stt path 1 sttnstrings = 47
INFO: stt enter stt id = standard
INFO: stt path 1
INFO: stt path 1 sttnstrings = 48
INFO: stt enter stt id = inline
INFO: stt path 1
INFO: stt path 1 sttnstrings = 49
INFO: stt enter stt id = Mk
INFO: stt path 1
INFO: stt path 1 sttnstrings = 50
INFO: stt enter stt id = Null
INFO: stt path 1
INFO: stt path 1 sttnstrings = 51
INFO: mknode va_alist
where                           kind    type(node)
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           1
signature   =                           37
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           2
signature   =                           41
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           3
signature   =                           40
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           4
signature   =                           43
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           5
signature   =                           27
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           6
signature   =                           24
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           7
signature   =                           45
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           8
signature   =                           51
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           9
signature   =                           16
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           10
signature   =                           14
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    5       ValSignature__state
kind   =                                5
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           11
signature   =                           LetterId__state
sig_done   =                            null
val_denotation   =                      null
INFO: mknode va_alist
mkode return                    5       ValSignature__state
kind   =                                5
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           12
signature   =                           LetterId__state
sig_done   =                            null
val_denotation   =                      null
INFO: mknode va_alist
mkode return                    5       ValSignature__state
kind   =                                5
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           13
signature   =                           LetterId__state
sig_done   =                            null
val_denotation   =                      null
INFO: mknode va_alist
mkode return                    4       VarSignature__state
kind   =                                4
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           14
signature   =                           LetterId__state
sig_done   =                            null
var_denotation   =                      null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           15
signature   =                           null
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    5       ValSignature__state
kind   =                                5
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           16
signature   =                           LetterId__state
sig_done   =                            null
val_denotation   =                      null
INFO: mknode va_alist
mkode return                    2       ParameterNode__state
kind   =                                2
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           17
par_id   =                              null
par_signature   =                       ValSignature__state
displacement   =                        null
level   =                               null
par_previous_definition   =             null
par_scope   =                           null
par_only_def   =                        null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           18
signature   =                           null
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
INFO: mknode va_alist
mkode return                    4       VarSignature__state
kind   =                                4
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           19
signature   =                           LetterId__state
sig_done   =                            null
var_denotation   =                      null
INFO: mknode va_alist
mkode return                    2       ParameterNode__state
kind   =                                2
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           20
par_id   =                              0
par_signature   =                       VarSignature__state
displacement   =                        null
level   =                               null
par_previous_definition   =             null
par_scope   =                           null
par_only_def   =                        null
INFO: mklist va_alist
mklist va_alist
mklist va_alist
mklist va_alist
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
lh_first   =                            null
lh_last   =                             null
mklist type p = ParameterNode__state
INFO: mklist type p = ParameterNode__state
kind   =                                2
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           20
par_id   =                              0
par_signature   =                       VarSignature__state
displacement   =                        null
level   =                               null
par_previous_definition   =             null
par_scope   =                           null
par_only_def   =                        null
mklist l before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
mklist p before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           20
addright dump_info(e) = ParameterNode__state
addright dump_info(e) = ParameterNode__state
addright 2 p = ConsNode__state
addright 2 p = ConsNode__state
cn_hd_field   =                         ParameterNode__state
cn_tl_field   =                         null
Unique Id   =                           22
is empty l.lh_first TRUE
is empty l.lh_first TRUE
addright 3 l = emptyListHeaderNode__state
addright 3 l = emptyListHeaderNode__state
addright - in next node lh first & last should equal p above
addright - in next node lh first & last should equal p above
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
lh_first   =                            ConsNode__state
lh_last   =                             ConsNode__state
addright return
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
mklist l after addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
mklist type p = ParameterNode__state
INFO: mklist type p = ParameterNode__state
kind   =                                2
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           17
par_id   =                              null
par_signature   =                       ValSignature__state
displacement   =                        null
level   =                               null
par_previous_definition   =             null
par_scope   =                           null
par_only_def   =                        null
mklist l before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
mklist p before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           17
addright dump_info(e) = ParameterNode__state
addright dump_info(e) = ParameterNode__state
addright 2 p = ConsNode__state
addright 2 p = ConsNode__state
cn_hd_field   =                         ParameterNode__state
cn_tl_field   =                         null
Unique Id   =                           23
is empty lh_first - FALSE
is empty lh_first - FALSE
addright - in next node lh last.cn_tl_field should equal p above
addright - in next node lh last.cn_tl_field should equal p above
cn_hd_field   =                         ParameterNode__state
cn_tl_field   =                         null
Unique Id   =                           23
addright - in next node lh last should equal p above
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
lh_first   =                            ConsNode__state
lh_last   =                             ConsNode__state
addright return
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
mklist l after addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
mklist done
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           21
INFO: mklist va_alist
mklist va_alist
mklist va_alist
mklist va_alist
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
lh_first   =                            null
lh_last   =                             null
mklist type p = ParameterNode__state
INFO: mklist type p = ParameterNode__state
kind   =                                2
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           17
par_id   =                              null
par_signature   =                       ValSignature__state
displacement   =                        null
level   =                               null
par_previous_definition   =             null
par_scope   =                           null
par_only_def   =                        null
mklist l before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
mklist p before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           17
addright dump_info(e) = ParameterNode__state
addright dump_info(e) = ParameterNode__state
addright 2 p = ConsNode__state
addright 2 p = ConsNode__state
cn_hd_field   =                         ParameterNode__state
cn_tl_field   =                         null
Unique Id   =                           25
is empty l.lh_first TRUE
is empty l.lh_first TRUE
addright 3 l = emptyListHeaderNode__state
addright 3 l = emptyListHeaderNode__state
addright - in next node lh first & last should equal p above
addright - in next node lh first & last should equal p above
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
lh_first   =                            ConsNode__state
lh_last   =                             ConsNode__state
addright return
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
mklist l after addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
mklist type p = ParameterNode__state
INFO: mklist type p = ParameterNode__state
kind   =                                2
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           17
par_id   =                              null
par_signature   =                       ValSignature__state
displacement   =                        null
level   =                               null
par_previous_definition   =             null
par_scope   =                           null
par_only_def   =                        null
mklist l before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
mklist p before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           17
addright dump_info(e) = ParameterNode__state
addright dump_info(e) = ParameterNode__state
addright 2 p = ConsNode__state
addright 2 p = ConsNode__state
cn_hd_field   =                         ParameterNode__state
cn_tl_field   =                         null
Unique Id   =                           26
is empty lh_first - FALSE
is empty lh_first - FALSE
addright - in next node lh last.cn_tl_field should equal p above
addright - in next node lh last.cn_tl_field should equal p above
cn_hd_field   =                         ParameterNode__state
cn_tl_field   =                         null
Unique Id   =                           26
addright - in next node lh last should equal p above
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
lh_first   =                            ConsNode__state
lh_last   =                             ConsNode__state
addright return
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
mklist l after addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
mklist done
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           24
INFO: mklist va_alist
mklist va_alist
mklist va_alist
mklist va_alist
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
lh_first   =                            null
lh_last   =                             null
mklist type p = ParameterNode__state
INFO: mklist type p = ParameterNode__state
kind   =                                2
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           20
par_id   =                              0
par_signature   =                       VarSignature__state
displacement   =                        null
level   =                               null
par_previous_definition   =             null
par_scope   =                           null
par_only_def   =                        null
mklist l before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
mklist p before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           20
addright dump_info(e) = ParameterNode__state
addright dump_info(e) = ParameterNode__state
addright 2 p = ConsNode__state
addright 2 p = ConsNode__state
cn_hd_field   =                         ParameterNode__state
cn_tl_field   =                         null
Unique Id   =                           28
is empty l.lh_first TRUE
is empty l.lh_first TRUE
addright 3 l = emptyListHeaderNode__state
addright 3 l = emptyListHeaderNode__state
addright - in next node lh first & last should equal p above
addright - in next node lh first & last should equal p above
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
lh_first   =                            ConsNode__state
lh_last   =                             ConsNode__state
addright return
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
mklist l after addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
mklist type p = ParameterNode__state
INFO: mklist type p = ParameterNode__state
kind   =                                2
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           20
par_id   =                              0
par_signature   =                       VarSignature__state
displacement   =                        null
level   =                               null
par_previous_definition   =             null
par_scope   =                           null
par_only_def   =                        null
mklist l before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
mklist p before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           20
addright dump_info(e) = ParameterNode__state
addright dump_info(e) = ParameterNode__state
addright 2 p = ConsNode__state
addright 2 p = ConsNode__state
cn_hd_field   =                         ParameterNode__state
cn_tl_field   =                         null
Unique Id   =                           29
is empty lh_first - FALSE
is empty lh_first - FALSE
addright - in next node lh last.cn_tl_field should equal p above
addright - in next node lh last.cn_tl_field should equal p above
cn_hd_field   =                         ParameterNode__state
cn_tl_field   =                         null
Unique Id   =                           29
addright - in next node lh last should equal p above
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
lh_first   =                            ConsNode__state
lh_last   =                             ConsNode__state
addright return
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
mklist l after addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
mklist done
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           27
INFO: mknode va_alist
mkode return                    6       FSignature__state
kind   =                                6
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           30
signature   =                           null
sig_done   =                            ListHeaderNode__state
fsig_construction   =                   ValSignature__state
fsig_special   =                        null
fsig_slink_known   =                    null
fsig_inline_code   =                    null
fsig_param_list   =                     null
fsig_result_sig   =                     null
INFO: mknode va_alist
mkode return                    6       FSignature__state
kind   =                                6
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           31
signature   =                           null
sig_done   =                            ListHeaderNode__state
fsig_construction   =                   ValSignature__state
fsig_special   =                        null
fsig_slink_known   =                    null
fsig_inline_code   =                    null
fsig_param_list   =                     null
fsig_result_sig   =                     null
INFO: mknode va_alist
mkode return                    6       FSignature__state
kind   =                                6
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           32
signature   =                           null
sig_done   =                            ListHeaderNode__state
fsig_construction   =                   ValSignature__state
fsig_special   =                        null
fsig_slink_known   =                    null
fsig_inline_code   =                    null
fsig_param_list   =                     null
fsig_result_sig   =                     null
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           33
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           33
lh_first   =                            null
lh_last   =                             null
INFO: mknode va_alist
mkode return                    6       FSignature__state
kind   =                                6
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           34
signature   =                           null
sig_done   =                            ListHeaderNode__state
fsig_construction   =                   VarSignature__state
fsig_special   =                        null
fsig_slink_known   =                    null
fsig_inline_code   =                    null
fsig_param_list   =                     null
fsig_result_sig   =                     null
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           35
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           35
lh_first   =                            null
lh_last   =                             null
INFO: mknode va_alist
mkode return                    6       FSignature__state
kind   =                                6
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           36
signature   =                           null
sig_done   =                            ListHeaderNode__state
fsig_construction   =                   ValSignature__state
fsig_special   =                        null
fsig_slink_known   =                    null
fsig_inline_code   =                    null
fsig_param_list   =                     null
fsig_result_sig   =                     null
INFO: mklist va_alist
mklist va_alist
mklist va_alist
mklist va_alist
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           37
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           37
lh_first   =                            null
lh_last   =                             null
mklist type p = ParameterNode__state
INFO: mklist type p = ParameterNode__state
kind   =                                2
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           20
par_id   =                              0
par_signature   =                       VarSignature__state
displacement   =                        null
level   =                               null
par_previous_definition   =             null
par_scope   =                           null
par_only_def   =                        null
mklist l before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           37
mklist p before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           20
addright dump_info(e) = ParameterNode__state
addright dump_info(e) = ParameterNode__state
addright 2 p = ConsNode__state
addright 2 p = ConsNode__state
cn_hd_field   =                         ParameterNode__state
cn_tl_field   =                         null
Unique Id   =                           38
is empty l.lh_first TRUE
is empty l.lh_first TRUE
addright 3 l = emptyListHeaderNode__state
addright 3 l = emptyListHeaderNode__state
addright - in next node lh first & last should equal p above
addright - in next node lh first & last should equal p above
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           37
lh_first   =                            ConsNode__state
lh_last   =                             ConsNode__state
addright return
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           37
mklist l after addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           37
mklist done
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           37
INFO: mknode va_alist
mkode return                    6       FSignature__state
kind   =                                6
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           39
signature   =                           null
sig_done   =                            ListHeaderNode__state
fsig_construction   =                   ValSignature__state
fsig_special   =                        null
fsig_slink_known   =                    null
fsig_inline_code   =                    null
fsig_param_list   =                     null
fsig_result_sig   =                     null
INFO: mknode va_alist
mkode return                    10      SignatureSigNode__state
kind   =                                10
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           40
signature   =                           null
sig_done   =                            null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           41
signature   =                           38
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           42
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           42
lh_first   =                            null
lh_last   =                             null
INFO: mknode va_alist
mkode return                    13      ApplicationNode__state
kind   =                                13
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           43
signature   =                           LetterId__state
sig_done   =                            ListHeaderNode__state
ap_operator   =                         null
ap_args   =                             null
ap_void_decl   =                        null
INFO: mknode va_alist
mkode return                    32      LetterId__state
kind   =                                32
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           44
signature   =                           39
sig_done   =                            null
sel_type   =                            null
id_str_table_index   =                  null
id_use_list   =                         null
id_last_definition   =                  null
id_def_found   =                        null
sel_index   =                           null
id_appl   =                             null
id_forward_ref   =                      null
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           45
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           45
lh_first   =                            null
lh_last   =                             null
INFO: mknode va_alist
mkode return                    13      ApplicationNode__state
kind   =                                13
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           46
signature   =                           LetterId__state
sig_done   =                            ListHeaderNode__state
ap_operator   =                         null
ap_args   =                             null
ap_void_decl   =                        null
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           47
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           47
lh_first   =                            null
lh_last   =                             null
INFO: mknode va_alist
mkode return                    13      ApplicationNode__state
kind   =                                13
vlineno   =                             9999
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           48
signature   =                           LetterId__state
sig_done   =                            ListHeaderNode__state
ap_operator   =                         null
ap_args   =                             null
ap_void_decl   =                        null
INFO: Calling yyparse
INFO: cclass1 c = 

INFO: cclass WHTCC
INFO: getchr linebuf = 
INFO: in while *linebuf = 5
INFO:  after read linebuf =  1872
INFO: ch =  
INFO: scan getchr read linebuf = 1872ch =  
INFO: cclass1 c =  
INFO: cclass c =  cctab[c] = 1
INFO: getchr linebuf = 1872
INFO: in while *linebuf = 4
INFO:  after read linebuf = 1872
INFO: ch = 1
INFO: scan getchr read linebuf = 872ch = 1
INFO: cclass1 c = 1
INFO: cclass c = 1cctab[c] = 3
INFO: getchr linebuf = 872
INFO: in while *linebuf = 3
INFO:  after read linebuf = 872
INFO: ch = 8
INFO: scan getchr read linebuf = 72ch = 8
INFO: cclass1 c = 8
INFO: cclass c = 8cctab[c] = 3
INFO: getchr linebuf = 72
INFO: in while *linebuf = 2
INFO:  after read linebuf = 72
INFO: ch = 7
INFO: scan getchr read linebuf = 2ch = 7
INFO: cclass1 c = 7
INFO: cclass c = 7cctab[c] = 3
INFO: getchr linebuf = 2
INFO: in while *linebuf = 1
INFO:  after read linebuf = 2
INFO: ch = 2
INFO: scan getchr read linebuf = ch = 2
INFO: cclass1 c = 2
INFO: cclass c = 2cctab[c] = 3
INFO: getchr linebuf = 
INFO: cclass1 c = -1
INFO: cclass EOFCC
INFO: Parser: action = 1
INFO: Parser: action = 147
INFO: mknode va_alist
mkode return                    34      UQStrNode__state
kind   =                                34
vlineno   =                             1
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           49
signature   =                           1872
sig_done   =                            null
sel_type   =                            null
str_string   =                          null
str_use_list   =                        null
str_expansion   =                       null
INFO: Parser: action = 82
INFO: Parser: action = 58
INFO: cclass1 c = -1
INFO: cclass EOFCC
INFO: Parser: action = 53
INFO: mklist va_alist
mklist va_alist
mklist va_alist
mklist va_alist
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             1
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           50
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             1
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           50
lh_first   =                            null
lh_last   =                             null
mklist type p = UQStrNode__state
INFO: mklist type p = UQStrNode__state
kind   =                                34
vlineno   =                             1
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           49
signature   =                           1872
sig_done   =                            null
sel_type   =                            null
str_string   =                          null
str_use_list   =                        null
str_expansion   =                       null
mklist l before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           50
mklist p before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           49
addright dump_info(e) = UQStrNode__state
addright dump_info(e) = UQStrNode__state
addright 2 p = ConsNode__state
addright 2 p = ConsNode__state
cn_hd_field   =                         UQStrNode__state
cn_tl_field   =                         null
Unique Id   =                           51
is empty l.lh_first TRUE
is empty l.lh_first TRUE
addright 3 l = emptyListHeaderNode__state
addright 3 l = emptyListHeaderNode__state
addright - in next node lh first & last should equal p above
addright - in next node lh first & last should equal p above
kind   =                                0
vlineno   =                             1
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           50
lh_first   =                            ConsNode__state
lh_last   =                             ConsNode__state
addright return
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           50
mklist l after addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           50
mklist done
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           50
INFO: Parser: action = 51
IN LENGTH
length count = 0dump_info(self.lh_first) = ConsNode__state
length count = 1dump_info(v) = UQStrNode__state
list_to_array count = 0dump_info(self.lh_first) = ConsNode__state
list to array len = 1 tmp = ConsNode__state
list to array count = 1 v = UQStrNode__state
INFO: mkappl size = 1
INFO: type body i = 1UQStrNode__state
INFO: mkappl2 head = 1 tail = 1
INFO: mklist va_alist
mklist va_alist
mklist va_alist
mklist va_alist
Creating emptylist
Creating emptylist
INFO: mknode va_alist
mkode return                    0       ListHeaderNode__state
kind   =                                0
vlineno   =                             1
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           52
lh_first   =                            null
lh_last   =                             null
kind   =                                0
vlineno   =                             1
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           52
lh_first   =                            null
lh_last   =                             null
mklist type p = UQStrNode__state
INFO: mklist type p = UQStrNode__state
kind   =                                34
vlineno   =                             1
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           49
signature   =                           1872
sig_done   =                            null
sel_type   =                            null
str_string   =                          null
str_use_list   =                        null
str_expansion   =                       null
mklist l before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           52
mklist p before addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           49
addright dump_info(e) = UQStrNode__state
addright dump_info(e) = UQStrNode__state
addright 2 p = ConsNode__state
addright 2 p = ConsNode__state
cn_hd_field   =                         UQStrNode__state
cn_tl_field   =                         null
Unique Id   =                           53
is empty l.lh_first TRUE
is empty l.lh_first TRUE
addright 3 l = emptyListHeaderNode__state
addright 3 l = emptyListHeaderNode__state
addright - in next node lh first & last should equal p above
addright - in next node lh first & last should equal p above
kind   =                                0
vlineno   =                             1
pre_num   =                             null
post_num   =                            null
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           52
lh_first   =                            ConsNode__state
lh_last   =                             ConsNode__state
addright return
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           52
mklist l after addright(l,p)
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           52
mklist done
cn_hd_field   =                         null
cn_tl_field   =                         null
Unique Id   =                           52
is empty lh_first - FALSE
is empty lh_first - FALSE
INFO: Parser: action = 50
INFO: Parser: action = 2
INFO: Parser: Program accepted!!!!
