diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2018-02-24 21:07:15 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2018-02-24 21:07:15 (GMT) |
commit | 8be736357b6ef233a9c637f5f6b73ed216c24d38 (patch) | |
tree | f29325e559eb09151101a708423593d0b50ceb7c /fickle | |
parent | 56e12771a321dfd6b62dc64aa43f1250d64c349e (diff) | |
download | blt-8be736357b6ef233a9c637f5f6b73ed216c24d38.zip blt-8be736357b6ef233a9c637f5f6b73ed216c24d38.tar.gz blt-8be736357b6ef233a9c637f5f6b73ed216c24d38.tar.bz2 |
add support for namespaces
Diffstat (limited to 'fickle')
-rw-r--r-- | fickle/fickle.tcl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/fickle/fickle.tcl b/fickle/fickle.tcl index ac97612..b230cb6 100644 --- a/fickle/fickle.tcl +++ b/fickle/fickle.tcl @@ -350,7 +350,7 @@ proc write_scanner_utils {} { puts $::dest " variable state_stack_ {} variable state_table_ - array set state_table_ {INITIAL 1}" + array set state_table_ \{[array get ::state_table]\}" } puts $::dest "\}" @@ -942,7 +942,6 @@ proc fickle_main {} { } } } - puts [array get ::state_table] } ###################################################################### |