diff options
author | Ruben Undheim <ruben.undheim@gmail.com> | 2019-03-16 11:26:38 +0100 |
---|---|---|
committer | Ruben Undheim <ruben.undheim@gmail.com> | 2019-03-16 11:26:38 +0100 |
commit | 521ec5e010477a8db7b7af93f279b514e7358610 (patch) | |
tree | 908a96487b954d0ef085395a6a584d97b52692c0 /scripts/getfillcell.tcl.in | |
parent | 914e9c04ed99450c4b285a9410d7a58c586fa9a2 (diff) |
Imported version 1.2.93
Diffstat (limited to 'scripts/getfillcell.tcl.in')
-rwxr-xr-x | scripts/getfillcell.tcl.in | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/getfillcell.tcl.in b/scripts/getfillcell.tcl.in index a0c73f7..4550e7b 100755 --- a/scripts/getfillcell.tcl.in +++ b/scripts/getfillcell.tcl.in @@ -128,9 +128,9 @@ while {[gets $flef line] >= 0} { if [regexp {[ \t]*MACRO[ \t]+(.+)[ \t]*$} $line lmatch macroname] { # Parse the "macro" statement parse_macro $flef $macroname - if {[string first $fillcell $macroname] == 0} { + if {[regexp "^$fillcell" $macroname] == 1} { # Check width against feedthrough width - puts stdout "Diagnostic: macro $macroname width = [subst \$${macroname}(w)]" + # puts stdout "Diagnostic: macro $macroname width = [subst \$${macroname}(w)]" if {[subst \$${macroname}(w)] == $fwidth} { set usefillcell $macroname } |