mirror of
https://github.com/wfjm/w11.git
synced 2026-02-25 00:37:48 +00:00
minor updates
- Rw11Probe: ctor: fData* initialized as 0 (not false)
- tbench/*/test_*.tcl: add proper device check
- ibd_ibtst: fix sensitivity list
- RlinkContext: BUGFIX: use proper polarity of status mask
- tools/asm-11/lib
- defs_*.tcl: add va.xxx and vp.xxx vector defs
- vec_devcatch{_reset}.mac: rename v..deu to v..xu
This commit is contained in:
@@ -1,10 +1,11 @@
|
||||
# $Id: test_tm11_int.tcl 895 2017-05-07 07:38:47Z mueller $
|
||||
# $Id: test_tm11_int.tcl 1120 2019-03-09 18:19:31Z mueller $
|
||||
#
|
||||
# Copyright 2015- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
||||
# Copyright 2015-2019 by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
||||
# License disclaimer see License.txt in $RETROBASE directory
|
||||
#
|
||||
# Revision History:
|
||||
# Date Rev Version Comment
|
||||
# 2019-03-09 1120 1.0.2 add proper device check
|
||||
# 2015-07-25 704 1.0.1 tmpproc_dotest: use args rather opts
|
||||
# 2015-05-17 683 1.0 Initial version
|
||||
#
|
||||
@@ -15,7 +16,10 @@
|
||||
rlc log "test_tm11_int: test interrupt response ------------------------------"
|
||||
rlc log " setup: all units online"
|
||||
package require ibd_tm11
|
||||
ibd_tm11::setup
|
||||
if {![ibd_tm11::setup]} {
|
||||
rlc log " test_tm11_regs-W: device not found, test aborted"
|
||||
return
|
||||
}
|
||||
|
||||
rlc set statmask $rw11::STAT_DEFMASK
|
||||
rlc set statvalue 0
|
||||
|
||||
@@ -1,10 +1,11 @@
|
||||
# $Id: test_tm11_regs.tcl 830 2016-12-26 20:25:49Z mueller $
|
||||
# $Id: test_tm11_regs.tcl 1120 2019-03-09 18:19:31Z mueller $
|
||||
#
|
||||
# Copyright 2015- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
||||
# Copyright 2015-2019 by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
||||
# License disclaimer see License.txt in $RETROBASE directory
|
||||
#
|
||||
# Revision History:
|
||||
# Date Rev Version Comment
|
||||
# 2019-03-09 1120 1.0.1 add proper device check
|
||||
# 2015-05-17 683 1.0 Initial version
|
||||
#
|
||||
# Test register response
|
||||
@@ -13,7 +14,10 @@
|
||||
# ----------------------------------------------------------------------------
|
||||
rlc log "test_tm11_regs: test register response ------------------------------"
|
||||
package require ibd_tm11
|
||||
ibd_tm11::setup
|
||||
if {![ibd_tm11::setup]} {
|
||||
rlc log " test_tm11_regs-W: device not found, test aborted"
|
||||
return
|
||||
}
|
||||
|
||||
rlc set statmask $rw11::STAT_DEFMASK
|
||||
rlc set statvalue 0
|
||||
|
||||
Reference in New Issue
Block a user