El SystemC:: Netlist:: Red es un módulo Perl que proporciona Red a un Módulo SystemC.

Esto es una superclase de Verilog:: Netlist:: Red, sacadas para un SystemC netlist alfiler.

Análisis sintáctico de ejemplo:

@example
paquete Trialparser;
@@ ISA = qw (SystemC:: Analizador sintáctico);

módulo de suscripción {
mi $self = cambio;
mi $module = cambio;
$self-de letra> nombre del archivo. ": $self-de ".> lineno ().": ";
la letra "Contiene la declaración de módulo para el $modulen";
@}

paquete principal;
mi $sp = Trialparser-> nuevo ();
El $sp-> leyó ("test.sp");
Ejemplo de @end

Ejemplo de Netlist:

@example
use SystemC:: Netlist;

mi $nl = nuevo SystemC:: Netlist ();
foreach mi $file (testnetlist.sp) {
$nl-> read_file (nombre del archivo => $file,
strip_autos => 1);
@}
$nl-> enlace ();
$nl-> automóviles ();
$nl-> hilas ();
$nl-> exit_if_error ();

foreach mi $mod ($nl-> modules_sorted) {
show_hier ($mod, "");
@}

suscripción show_hier {
mi $mod = cambio;
mi $indent = cambio;
$indent de letra, "Módulo", $mod-> nombre, "n";
foreach mi $cell ($mod-> cells_sorted) {
show_hier ($cell-> submod, $indent. "". $cell-> nombre. "");
@}
@}
Ejemplo de @end