luke
/
xschem
mirror of https://github.com/StefanSchippers/xschem.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

proc has_included_subcircuit: better filter newlines in `.include file` lines in spice_sym_def attributes

This commit is contained in:
stefan schippers 2024-03-06 01:50:43 +01:00
parent 866d519531
commit e71a7374b2
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/xschem.tcl
View File

@ -783,13 +783,14 @@ proc tabulate {text {sep ",\t "}} {
proc has_included_subcircuit {symname spice_sym_def} {
global has_x
set include_found 0
# puts "has_included_subcircuit: spice_sym_def=$spice_sym_def"
regsub -all {\n\+} $spice_sym_def { } spice_sym_def
# puts "has_included_subcircuit: spice_sym_def=$spice_sym_def"
set pinlist {}
# .include? get the file ...
if {[regexp -nocase {^ *\.include +} $spice_sym_def]} {
regsub -nocase {^ *\.include +} $spice_sym_def {} filename
regsub -all {^"|"$} $filename {} filename
if {[regexp -nocase {^[ \t\n]*\.include +} $spice_sym_def]} {
regsub -nocase {^[ \t\n]*\.include +} $spice_sym_def {} filename
regsub -all {^"|"$} $filename {} filename ;# remove double quotes at beginning and end
regsub -all {^\n*|\n*$} $filename {} filename ;# remove newlines at beginning and end
set filename [abs_sym_path $filename]
# puts "filename=$filename"
set res [catch {open $filename r} fd]