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

Subversion Repositories openmsp430

[/] [openmsp430/] [trunk/] [core/] [sim/] [rtl_sim/] [bin/] [ihex2mem.tcl] - Diff between revs 17 and 106

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 17 Rev 106
Line 27... Line 27...
# 
# 
# Author(s):
# Author(s):
#             - Olivier Girard,    olgirard@gmail.com
#             - Olivier Girard,    olgirard@gmail.com
#
#
#------------------------------------------------------------------------------
#------------------------------------------------------------------------------
# $Rev: 17 $
# $Rev: 106 $
# $LastChangedBy: olivier.girard $
# $LastChangedBy: olivier.girard $
# $LastChangedDate: 2009-08-04 23:15:39 +0200 (Tue, 04 Aug 2009) $
# $LastChangedDate: 2011-03-25 23:01:03 +0100 (Fri, 25 Mar 2011) $
#------------------------------------------------------------------------------
#------------------------------------------------------------------------------
 
 
###############################################################################
###############################################################################
#                            PARAMETER CHECK                                  #
#                            PARAMETER CHECK                                  #
###############################################################################
###############################################################################
Line 87... Line 87...
    puts "ERROR Cannot open input file $ihex"
    puts "ERROR Cannot open input file $ihex"
    exit 1
    exit 1
}
}
 
 
# MEMH Output
# MEMH Output
 
if { "$out"=="-"} {
 
   set f_out stdout
 
} else {
if [catch {open $out w } f_out]  {
if [catch {open $out w } f_out]  {
    puts "ERROR Cannot create output file $out"
    puts "ERROR Cannot create output file $out"
    exit 1
    exit 1
}
}
 
}
 
 
#-----------------------------------------------------------------------------#
#-----------------------------------------------------------------------------#
#                                 CONVERSION                                  #
#                                 CONVERSION                                  #
#-----------------------------------------------------------------------------#
#-----------------------------------------------------------------------------#
 
 
Line 146... Line 149...
    }
    }
    puts -nonewline $f_out " [format "%02s" $mem_arr($i) ]"
    puts -nonewline $f_out " [format "%02s" $mem_arr($i) ]"
}
}
 
 
puts  $f_out "\n"
puts  $f_out "\n"
 
 
 
if { "$out"!="-"} {
close $f_out
close $f_out
 
}
 
 
exit 0
exit 0
 
 
 No newline at end of file
 No newline at end of file

powered by: WebSVN 2.1.0

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