From 3ec47760a7122afcacb963bf7d2d12c11366519c Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Fri, 10 Mar 2023 02:54:53 +0100
Subject: [PATCH] xschem logic_get changed to xschem logic_get_net for
 consistency

---
 doc/xschem_man/developer_info.html | 2 +-
 src/scheduler.c                    | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/doc/xschem_man/developer_info.html b/doc/xschem_man/developer_info.html
index 367ae30a..246ef929 100644
--- a/doc/xschem_man/developer_info.html
+++ b/doc/xschem_man/developer_info.html
@@ -773,7 +773,7 @@ C {verilog_timescale.sym} 1050 -100 0 0 {name=s1 timestep="1ns" precision="1ns"
   If 'f' is given output stderr messages to file 'f'
   if 'f' is not given and a file log is open, close log
   file and resume logging to stderr </pre>
-  <li><kbd>       logic_get net_name</kbd></li><pre>
+  <li><kbd>       logic_get_net net_name</kbd></li><pre>
   Get logic state of net named 'net_name'
   Returns 0, 1, 2, 3 for logic levels 0, 1, X, Z or nothing if no net found.</pre>
   <li><kbd>       logic_set_net net_name n [num]</kbd></li><pre>
diff --git a/src/scheduler.c b/src/scheduler.c
index bde28f02..e06f9a0a 100644
--- a/src/scheduler.c
+++ b/src/scheduler.c
@@ -1858,11 +1858,11 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
       else if(argc==2 && errfp != stderr) { fclose(errfp); errfp=stderr; }
     }
 
-    /* logic_get net_name
+    /* logic_get_net net_name
      *   Get logic state of net named 'net_name'
      *   Returns 0, 1, 2, 3 for logic levels 0, 1, X, Z or nothing if no net found.
      */
-    else if(!strcmp(argv[1], "logic_get"))
+    else if(!strcmp(argv[1], "logic_get_net"))
     {
       static char s[2]="X";
       Tcl_ResetResult(interp);