1# root sep and wildcard 2M input.tcl /^namespace eval M {$/;" n 3/M input.tcl /^namespace eval M {$/;" n 4N input.tcl /^ namespace eval N {$/;" n namespace:/M 5/M+N input.tcl /^ namespace eval N {$/;" n namespace:/M 6p0 input.tcl /^ proc p0 {s} {$/;" p namespace:/M+N 7/M+N+p0 input.tcl /^ proc p0 {s} {$/;" p namespace:/M+N 8p1 input.tcl /^proc p1 {s} {$/;" p 9/p1 input.tcl /^proc p1 {s} {$/;" p 10# override wildcard 11M input.tcl /^namespace eval M {$/;" n 12/M input.tcl /^namespace eval M {$/;" n 13N input.tcl /^ namespace eval N {$/;" n namespace:/M 14/M->N input.tcl /^ namespace eval N {$/;" n namespace:/M 15p0 input.tcl /^ proc p0 {s} {$/;" p namespace:/M->N 16/M->N^p0 input.tcl /^ proc p0 {s} {$/;" p namespace:/M->N 17p1 input.tcl /^proc p1 {s} {$/;" p 18/p1 input.tcl /^proc p1 {s} {$/;" p 19# override rootsep 20M input.tcl /^namespace eval M {$/;" n 21@M input.tcl /^namespace eval M {$/;" n 22N input.tcl /^ namespace eval N {$/;" n namespace:@M 23@M+N input.tcl /^ namespace eval N {$/;" n namespace:@M 24p0 input.tcl /^ proc p0 {s} {$/;" p namespace:@M+N 25@M+N+p0 input.tcl /^ proc p0 {s} {$/;" p namespace:@M+N 26p1 input.tcl /^proc p1 {s} {$/;" p 27%p1 input.tcl /^proc p1 {s} {$/;" p 28# no default 29M input.tcl /^namespace eval M {$/;" n 30@M input.tcl /^namespace eval M {$/;" n 31N input.tcl /^ namespace eval N {$/;" n namespace:@M 32@M->N input.tcl /^ namespace eval N {$/;" n namespace:@M 33p0 input.tcl /^ proc p0 {s} {$/;" p namespace:@M->N 34@M->N^p0 input.tcl /^ proc p0 {s} {$/;" p namespace:@M->N 35p1 input.tcl /^proc p1 {s} {$/;" p 36%p1 input.tcl /^proc p1 {s} {$/;" p 37