diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2018-03-02 23:02:24 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2018-03-02 23:02:24 (GMT) |
commit | cc194ebc389108dc1cf02ee4500e0bb0106f36cd (patch) | |
tree | be03c3b19ab718aca41ae27e6b67fdde32e7c7cb /taccle/taccle.tcl | |
parent | 381f8d4cfea15575cc399292d658b7fec181d3e8 (diff) | |
download | blt-cc194ebc389108dc1cf02ee4500e0bb0106f36cd.zip blt-cc194ebc389108dc1cf02ee4500e0bb0106f36cd.tar.gz blt-cc194ebc389108dc1cf02ee4500e0bb0106f36cd.tar.bz2 |
yylval in namespace
Diffstat (limited to 'taccle/taccle.tcl')
-rw-r--r-- | taccle/taccle.tcl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/taccle/taccle.tcl b/taccle/taccle.tcl index 8ed3639..661303f 100644 --- a/taccle/taccle.tcl +++ b/taccle/taccle.tcl @@ -1021,10 +1021,9 @@ proc write_header_file {} { if {$::token_id_table($tok_id,t) == $::TERMINAL && \ [string is integer $tok_id] && $tok_id >= 256} { set token $::token_id_table($tok_id) - puts $::header "set ${token} $tok_id" + puts $::header "variable ${token} $tok_id" } } - puts $::header "set yylval \{\}" puts $::header "\}" } |