Added missing close-bracket in the readspice script, and corrected

a diagnostic error output in the port command.
This commit is contained in:
Tim Edwards 2020-05-29 17:13:38 -04:00
parent 643bd096ea
commit 336a7aa209
2 changed files with 4 additions and 4 deletions

View File

@ -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;

View File

@ -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]
}