@@ -6,15 +6,6 @@ setattr -mod -set keep_hierarchy 1 single_port_ram
6
6
setattr -mod -set keep_hierarchy 1 dual_port_ram
7
7
setattr -mod -set keep 1 dual_port_ram
8
8
9
- # synlig path error handling
10
- # if {[catch {set synlig $::env(synlig_exe_path)} err]} {
11
- # puts "Error: $err"
12
- # puts "synlig_exe_path is not set"
13
- # } else {
14
- # set synlig $::env(synlig_exe_path)
15
- # puts "Using parmys as partial mapper"
16
- # }
17
-
18
9
# yosys-slang plugin error handling
19
10
if {$env(PARSER) == " slang" } {
20
11
if {![info exists ::env(yosys_slang_path)]} {
@@ -34,7 +25,6 @@ if {$env(PARSER) == "slang" } {
34
25
error " Invalid PARSER"
35
26
}
36
27
37
-
38
28
# arch file: QQQ
39
29
# input files: [XXX]
40
30
# other args: [YYY]
@@ -46,43 +36,22 @@ parmys_arch -a QQQ
46
36
# if {$env(PARSER) == "surelog" } {
47
37
# puts "Using Synlig read_uhdm command"
48
38
# exec $synlig -p "read_uhdm XXX"
49
-
50
- # } elseif {$env(PARSER) == "system-verilog" } {
51
- # puts "Using Synlig read_systemverilog "
52
- # exec $synlig -p "read_systemverilog XXX"
53
- # }
39
+ # }
54
40
55
41
if {$env(PARSER) == " slang" } {
56
42
# Create a file list containing the name(s) of file(s) \
57
43
# to read together with read_slang
58
- set sv_files {}
59
- set v_files {}
60
44
set readfile [file join [pwd ] " filelist.txt" ]
61
45
set fh [open $readfile " w" ]
62
46
foreach f {XXX} {
63
47
set ext [string tolower [file extension $f ]]
64
- switch -- $ext {
65
- .sv {
66
- lappend $sv_files $f
67
- puts $fh $f
68
- }
69
- .svh {
70
- lappend $sv_files $f
71
- puts $fh $f
72
- }
73
- .v {
74
- error " Use default parser to parse .v files."
75
- }
76
- .vh {
77
- error " Use default parser to parse .v files."
78
- }
48
+ if {$ext == " .sv" || $ext == " .svh" || $ext == " .v" || $ext == " .vh" } {
49
+ puts $fh $f
50
+ } else {
51
+ error " Unsupported file type. Yosys-Slang accepts .sv .svh .v .vh"
79
52
}
80
53
}
81
54
close $fh
82
- # if {[llength $sv_files] > 0} {
83
- # puts "Using Yosys read_slang command"
84
- # read_slang -C $readfile
85
- # }
86
55
puts " Using Yosys read_slang command"
87
56
read_slang -C $readfile
88
57
} elseif {$env(PARSER) == " default" } {
0 commit comments