diff --git a/doc/xschem_man/developer_info.html b/doc/xschem_man/developer_info.html
index 5eca47f1..5de3ca2f 100644
--- a/doc/xschem_man/developer_info.html
+++ b/doc/xschem_man/developer_info.html
@@ -569,7 +569,7 @@ C {verilog_timescale.sym} 1050 -100 0 0 {name=s1 timestep="1ns" precision="1ns"
    <li><kbd>       edit_prop</kbd></li><pre>
    Edit global schematic/symbol attributes or attributes
    of currently selected instances </pre>
-   <li><kbd>       edit_prop</kbd></li><pre>
+   <li><kbd>       edit_vi_prop</kbd></li><pre>
    Edit global schematic/symbol attributes or
    attributes of currently selected instances
    using a text editor (defined in tcl 'editor' variable) </pre>
@@ -716,6 +716,11 @@ C {verilog_timescale.sym} 1050 -100 0 0 {name=s1 timestep="1ns" precision="1ns"
    <li><kbd>       instance_bbox inst</kbd></li><pre>
    return instance and symbol bounding boxes
    'inst' can be an instance name or number </pre>
+   <li><kbd>       instance_list</kbd></li><pre>
+   Return a list of 3-items. Each 3-item is 
+   an instance name followed by the symbol reference and symbol type.
+   Example: xschem instance_list --&gt;
+      {x1} {sky130_tests/bandgap.sym} {subcircuit}} {...} {...} {...} ... </pre>
    <li><kbd>       instance_net inst pin</kbd></li><pre>
    Return the name of the net attached to pin 'pin' of instance 'inst'
    Example: xschem instance_net x3 MINUS --&gt; REF </pre>
diff --git a/src/scheduler.c b/src/scheduler.c
index 9d904b00..3c9249d1 100644
--- a/src/scheduler.c
+++ b/src/scheduler.c
@@ -639,7 +639,7 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
       Tcl_ResetResult(interp);
     }
 
-    /* edit_prop
+    /* edit_vi_prop
      *   Edit global schematic/symbol attributes or
      *   attributes of currently selected instances
      *   using a text editor (defined in tcl 'editor' variable) */
@@ -1503,7 +1503,23 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
         Tcl_AppendResult(interp, s, NULL);
       }
     }
-
+    /* instance_list
+     *   Return a list of 3-items. Each 3-item is 
+     *   an instance name followed by the symbol reference and symbol type.
+     *   Example: xschem instance_list -->
+     *     {x1} {sky130_tests/bandgap.sym} {subcircuit}} {...} {...} {...} ... */
+    else if(!strcmp(argv[1], "instance_list"))
+    {
+      int i;
+      for(i = 0; i < xctx->instances; ++i) {
+        char *name = xctx->inst[i].name ? xctx->inst[i].name : "";
+        char *instname = xctx->inst[i].instname ? xctx->inst[i].instname : "";
+        char *type = (xctx->inst[i].ptr + xctx->sym)->type;
+        type = type ? type : "";
+        if(i > 0) Tcl_AppendResult(interp, " ", NULL);
+        Tcl_AppendResult(interp, "{", instname, "} {", name, "} {", type, "}", NULL);
+      }
+    }
     /* instance_net inst pin
      *   Return the name of the net attached to pin 'pin' of instance 'inst'
      *   Example: xschem instance_net x3 MINUS --> REF */