Added missing close-bracket in the readspice script, and corrected
a diagnostic error output in the port command.
This commit is contained in:
parent
643bd096ea
commit
336a7aa209
|
|
@ -1394,9 +1394,9 @@ CmdPort(w, cmd)
|
|||
if (lab == NULL)
|
||||
{
|
||||
if (StrIsInt(cmd->tx_argv[1]))
|
||||
TxError("No label found with name %s.\n", cmd->tx_argv[1]);
|
||||
TxError("No label found with index %s.\n", cmd->tx_argv[1]);
|
||||
else
|
||||
TxError("No port found with index %s.\n", cmd->tx_argv[1]);
|
||||
TxError("No port found with name %s.\n", cmd->tx_argv[1]);
|
||||
return;
|
||||
}
|
||||
argstart = 2;
|
||||
|
|
|
|||
|
|
@ -117,11 +117,11 @@ proc readspice {netfile} {
|
|||
# is by no means exhaustive.
|
||||
|
||||
if {$pinidx == ""} {
|
||||
set testpin [string map {\[ < \] >]} $pin
|
||||
set testpin [string map {\[ < \] >]} $pin]
|
||||
set pinidx [port $testpin index]
|
||||
}
|
||||
if {$pinidx == ""} {
|
||||
set testpin [string map {< \[ > \]} $pin
|
||||
set testpin [string map {< \[ > \]} $pin]
|
||||
set pinidx [port $testpin index]
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue