From 89f538ffa1265f9b565f997e69a9dfa71aa1fa34 Mon Sep 17 00:00:00 2001
From: Stefan Frederik <stefan.schippers@gmail.com>
Date: Mon, 25 Apr 2022 08:39:51 +0200
Subject: [PATCH] added bindkey "s" for running simulation

---
 src/callback.c | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/callback.c b/src/callback.c
index 5dd50427..dba9516a 100644
--- a/src/callback.c
+++ b/src/callback.c
@@ -1443,7 +1443,11 @@ int callback(const char *winpath, int event, int mx, int my, KeySym key,
     set_tcl_netlist_type();
     break;
    }
-
+   if(key=='s' && (state == 0) )      /* simulate */
+   {
+     tcleval("[xschem get top_path].menubar.simulate invoke");
+     break;
+   }
    if(key=='s' && (state == ControlMask) )      /* save 20121201 */
    {
      if(xctx->semaphore >= 2) break;