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>
This commit is contained in:
parent
82f44a4708
commit
679f6602fd
|
@ -5,6 +5,12 @@
|
||||||
# http://www.st.com/stonline/products/literature/um/7889.pdf
|
# http://www.st.com/stonline/products/literature/um/7889.pdf
|
||||||
#
|
#
|
||||||
|
|
||||||
|
if { [info exists PARPORTADDR] } {
|
||||||
|
set _PARPORTADDR $PARPORTADDR
|
||||||
|
} else {
|
||||||
|
set _PARPORTADDR 0
|
||||||
|
}
|
||||||
|
|
||||||
interface parport
|
interface parport
|
||||||
parport_port 0
|
parport_port $_PARPORTADDR
|
||||||
parport_cable flashlink
|
parport_cable flashlink
|
||||||
|
|
|
@ -3,6 +3,12 @@
|
||||||
#
|
#
|
||||||
# Addresses: 0x378/LPT1 or 0x278/LPT2 ...
|
# Addresses: 0x378/LPT1 or 0x278/LPT2 ...
|
||||||
|
|
||||||
|
if { [info exists PARPORTADDR] } {
|
||||||
|
set _PARPORTADDR $PARPORTADDR
|
||||||
|
} else {
|
||||||
|
set _PARPORTADDR 0x378
|
||||||
|
}
|
||||||
|
|
||||||
interface parport
|
interface parport
|
||||||
parport_port 0x378
|
parport_port $_PARPORTADDR
|
||||||
parport_cable wiggler
|
parport_cable wiggler
|
||||||
|
|
|
@ -4,7 +4,13 @@
|
||||||
# http://www.xilinx.com/itp/xilinx4/data/docs/pac/appendixb.html
|
# http://www.xilinx.com/itp/xilinx4/data/docs/pac/appendixb.html
|
||||||
#
|
#
|
||||||
|
|
||||||
|
if { [info exists PARPORTADDR] } {
|
||||||
|
set _PARPORTADDR $PARPORTADDR
|
||||||
|
} else {
|
||||||
|
set _PARPORTADDR 0
|
||||||
|
}
|
||||||
|
|
||||||
interface parport
|
interface parport
|
||||||
parport_port 0
|
parport_port $_PARPORTADDR
|
||||||
parport_cable dlc5
|
parport_cable dlc5
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue