URL
https://opencores.org/ocsvn/an-fpga-implementation-of-low-latency-noc-based-mpsoc/an-fpga-implementation-of-low-latency-noc-based-mpsoc/trunk
Subversion Repositories an-fpga-implementation-of-low-latency-noc-based-mpsoc
[/] [an-fpga-implementation-of-low-latency-noc-based-mpsoc/] [trunk/] [mpsoc/] [perl_gui/] [lib/] [perl/] [sv_parser.pl] - Rev 48
Compare with Previous | Blame | View Log
#! /usr/bin/perl -w use strict; use warnings; use FindBin; use lib $FindBin::Bin; use Regexp::Common qw /comment/; require "common.pl"; sub extract_sv_code { my $file=shift; my $text = load_file($file); $text =~ s/($RE{comment}{'C++'})//g; return $text; } sub read_sv_file { my $file=shift; #read file and remove all comments my $code = extract_sv_code($file); print $code; }