summaryrefslogtreecommitdiff
path: root/lib/simulator/engine/engine_hibernation.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'lib/simulator/engine/engine_hibernation.tcl')
-rw-r--r--[-rwxr-xr-x]lib/simulator/engine/engine_hibernation.tcl39
1 files changed, 24 insertions, 15 deletions
diff --git a/lib/simulator/engine/engine_hibernation.tcl b/lib/simulator/engine/engine_hibernation.tcl
index 24d3adf..d5a5faa 100755..100644
--- a/lib/simulator/engine/engine_hibernation.tcl
+++ b/lib/simulator/engine/engine_hibernation.tcl
@@ -2,7 +2,7 @@
# Part of MCU 8051 IDE ( http://mcu8051ide.sf.net )
############################################################################
-# Copyright (C) 2007-2009 by Martin Ošmera #
+# Copyright (C) 2007, 2008, 2009, 2010, 2011, 2012 by Martin Ošmera #
# martin.osmera@gmail.com #
# #
# This program is free software; you can redistribute it and#or modify #
@@ -21,6 +21,11 @@
# 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. #
############################################################################
+# >>> File inclusion guard
+if { ! [ info exists _ENGINE_HIBERNATION_TCL ] } {
+set _ENGINE_HIBERNATION_TCL _
+# <<< File inclusion guard
+
# --------------------------------------------------------------------------
# DESCRIPTION
# Part of simulator engine functionality.
@@ -39,16 +44,16 @@ public method simulator_get_special {} {
$timer_0_running $timer_1_running $overall_time \
$overall_instructions $inter_in_p_flags $timer1_overflow
- if {$feature_avaliable(t2)} {
+ if {$feature_available(t2)} {
lappend result $timer_2_running $timer2_overflow
}
- if {$feature_avaliable(wtd)} {
+ if {$feature_available(wtd)} {
lappend result $watchdog_value $wdtrst_prev_val
}
- if {$feature_avaliable(wdtcon)} {
+ if {$feature_available(wdtcon)} {
lappend result $wdt_prescaler_val $controllers_conf(WatchDogPrescaler)
}
- if {$feature_avaliable(pwm)} {
+ if {$feature_available(pwm)} {
lappend result $pwm_running $pwm_OCR
}
if {$eeprom_size} {
@@ -64,13 +69,13 @@ public method simulator_get_special {} {
lappend result $eeprom_WR_buff($i)
}
}
- if {$feature_avaliable(hddptr)} {
+ if {$feature_available(hddptr)} {
lappend result $hidden_DPTR0 $hidden_DPTR1
}
- if {$feature_avaliable(acomparator)} {
+ if {$feature_available(acomparator)} {
lappend result $anlcmp_running $anlcmp_output $anlcpm_db_timer
}
- if {$feature_avaliable(uart)} {
+ if {$feature_available(uart)} {
lappend result \
$uart_clock_prescaler \
$uart_RX_clock \
@@ -100,25 +105,25 @@ public method simulator_set_special {list} {
incr i
}
- if {$feature_avaliable(t2)} {
+ if {$feature_available(t2)} {
set timer_2_running [lindex $list $i]
incr i
set timer2_overflow [lindex $list $i]
incr i
}
- if {$feature_avaliable(wtd)} {
+ if {$feature_available(wtd)} {
set watchdog_value [lindex $list $i]
incr i
set wdtrst_prev_val [lindex $list $i]
incr i
}
- if {$feature_avaliable(wdtcon)} {
+ if {$feature_available(wdtcon)} {
set wdt_prescaler_val [lindex $list $i]
incr i
set controllers_conf(WatchDogPrescaler) [lindex $list $i]
incr i
}
- if {$feature_avaliable(pwm)} {
+ if {$feature_available(pwm)} {
set pwm_running [lindex $list $i]
incr i
set pwm_OCR [lindex $list $i]
@@ -142,13 +147,13 @@ public method simulator_set_special {list} {
set eeprom_WR_buff($j) [lindex $list $i]
}
}
- if {$feature_avaliable(hddptr)} {
+ if {$feature_available(hddptr)} {
set hidden_DPTR0 [lindex $list $i]
incr i
set hidden_DPTR1 [lindex $list $i]
incr i
}
- if {$feature_avaliable(acomparator)} {
+ if {$feature_available(acomparator)} {
set anlcmp_running [lindex $list $i]
incr i
set anlcmp_output [lindex $list $i]
@@ -156,7 +161,7 @@ public method simulator_set_special {list} {
set anlcpm_db_timer [lindex $list $i]
incr i
}
- if {$feature_avaliable(uart)} {
+ if {$feature_available(uart)} {
set uart_clock_prescaler [lindex $list $i]
incr i
set uart_RX_clock [lindex $list $i]
@@ -203,3 +208,7 @@ public method simulator_hib_append_SB_spec {list} {
public method simulator_hib_append_SB_norm {list} {
lappend stepback_normal $list
}
+
+# >>> File inclusion guard
+}
+# <<< File inclusion guard