OpenCores
URL https://opencores.org/ocsvn/scan_based_serial_communication/scan_based_serial_communication/trunk

Subversion Repositories scan_based_serial_communication

Compare Revisions

  • This comparison shows the changes necessary to convert path
    /scan_based_serial_communication
    from Rev 6 to Rev 7
    Reverse comparison

Rev 6 → Rev 7

/trunk/deperlify.pl
167,17 → 167,21
 
open (BLOCK_CODE, ">" . $temp_file);
print BLOCK_CODE $text;
# run perl on block
$generated_text = `perl $temp_file`;
 
# Stop if there's an error
if ($? != 0) {
die;
# Check for errors in the eval statement
if ($generated_text ne "") {
`rm $temp_file`;
} else {
print "\n";
print "################################################################################################\n";
print "### Error in deperlify section. Check $temp_file for evaluated perl code ###\n";
print "################################################################################################\n";
print "\n";
exit;
}
 
`rm $temp_file`;
 
return $generated_text;
}
 

powered by: WebSVN 2.1.0

© copyright 1999-2020 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.