PARPORT: add PARPORTADDR tcl variable
Add PARPORTADDR tcl variable making it easier to change parallel port address in scripts. Signed-off-by: Spencer Oliver <ntfreak@users.sourceforge.net>__archive__
parent
82f44a4708
commit
679f6602fd
|
@ -5,6 +5,12 @@
|
|||
# http://www.st.com/stonline/products/literature/um/7889.pdf
|
||||
#
|
||||
|
||||
if { [info exists PARPORTADDR] } {
|
||||
set _PARPORTADDR $PARPORTADDR
|
||||
} else {
|
||||
set _PARPORTADDR 0
|
||||
}
|
||||
|
||||
interface parport
|
||||
parport_port 0
|
||||
parport_port $_PARPORTADDR
|
||||
parport_cable flashlink
|
||||
|
|
|
@ -3,6 +3,12 @@
|
|||
#
|
||||
# Addresses: 0x378/LPT1 or 0x278/LPT2 ...
|
||||
|
||||
if { [info exists PARPORTADDR] } {
|
||||
set _PARPORTADDR $PARPORTADDR
|
||||
} else {
|
||||
set _PARPORTADDR 0x378
|
||||
}
|
||||
|
||||
interface parport
|
||||
parport_port 0x378
|
||||
parport_port $_PARPORTADDR
|
||||
parport_cable wiggler
|
||||
|
|
|
@ -4,7 +4,13 @@
|
|||
# http://www.xilinx.com/itp/xilinx4/data/docs/pac/appendixb.html
|
||||
#
|
||||
|
||||
if { [info exists PARPORTADDR] } {
|
||||
set _PARPORTADDR $PARPORTADDR
|
||||
} else {
|
||||
set _PARPORTADDR 0
|
||||
}
|
||||
|
||||
interface parport
|
||||
parport_port 0
|
||||
parport_port $_PARPORTADDR
|
||||
parport_cable dlc5
|
||||
|
||||
|
|
Loading…
Reference in New Issue