X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=tcl%2Finterface%2Fparport.cfg;h=4c0b260b9f921c76d0b71eb1dfdf25e412f78fa0;hb=80a5285ea6157706075e783fd6cb1ad09875d660;hp=326005a9d03c3f51b3f9c8029bff30923447f94c;hpb=679f6602fd1a7e9763bac52f06bbf2db28098d9a;p=fw%2Fopenocd diff --git a/tcl/interface/parport.cfg b/tcl/interface/parport.cfg index 326005a9d..4c0b260b9 100644 --- a/tcl/interface/parport.cfg +++ b/tcl/interface/parport.cfg @@ -2,13 +2,18 @@ # Parallel port wiggler (many clones available) on port 0x378 # # Addresses: 0x378/LPT1 or 0x278/LPT2 ... +# if { [info exists PARPORTADDR] } { - set _PARPORTADDR $PARPORTADDR + set _PARPORTADDR $PARPORTADDR } else { - set _PARPORTADDR 0x378 + if {$tcl_platform(platform) eq "windows"} { + set _PARPORTADDR 0x378 + } { + set _PARPORTADDR 0 + } } -interface parport +adapter driver parport parport_port $_PARPORTADDR parport_cable wiggler