Tcl Library Source Code

Check-in [29c5675b36]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Fix order of cleanup operations; dropping unrealizable non-terminals is known to result in new unreachable ones.
Timelines: family | ancestors | descendants | both | pt-container-ssoberni
Files: files | file ages | folders
SHA3-256:29c5675b36ea7f50d1f5992c8431998508dfce91d545c66750b92ea92b7e0dc5
User & Date: ssoberni 2018-06-13 21:48:21
Context
2018-06-14
09:40
Fix typo in variable use check-in: e3fcb27310 user: ssoberni tags: pt-container-ssoberni
2018-06-13
21:48
Fix order of cleanup operations; dropping unrealizable non-terminals is known to result in new unreachable ones. check-in: 29c5675b36 user: ssoberni tags: pt-container-ssoberni
21:34
Create new branch named "pt-container-ssoberni" check-in: 73a81cc2ca user: ssoberni tags: pt-container-ssoberni
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to modules/pt/pt_peg_op.tcl.

186
187
188
189
190
191
192
193
194

195
196
197
198
199
200
201
    }
}

# # ## ### ##### ######## #############

proc ::pt::peg::op::minimize {container} {
    flatten           $container
    drop unreachable  $container
    drop unrealizable $container

    flatten           $container
    optmodes          $container
    dechain           $container
    return
}

# # ## ### ##### ######## #############







<

>







186
187
188
189
190
191
192

193
194
195
196
197
198
199
200
201
    }
}

# # ## ### ##### ######## #############

proc ::pt::peg::op::minimize {container} {
    flatten           $container

    drop unrealizable $container
    drop unreachable  $container
    flatten           $container
    optmodes          $container
    dechain           $container
    return
}

# # ## ### ##### ######## #############