From 8b18c8c276d531a9ec332005395228b5c5e15cb8 Mon Sep 17 00:00:00 2001
From: Henner Zeller <h.zeller@acm.org>
Date: Tue, 7 Apr 2026 18:30:48 +0200
Subject: [PATCH] On bazel: use readline set-up provided by OpenROAD

The bazel compile always happens as submodule in OpenROAD, so
we can use the same mechanism provided there to set up the
readline library.

Signed-off-by: Henner Zeller <h.zeller@acm.org>
---
 BUILD       |  1 +
 app/Main.cc | 14 +++++++++-----
 2 files changed, 10 insertions(+), 5 deletions(-)

diff --git a/BUILD b/BUILD
index fdc2beb9..8192d047 100644
--- a/BUILD
+++ b/BUILD
@@ -296,6 +296,7 @@ cc_binary(
     visibility = ["//visibility:public"],
     deps = [
         ":opensta_lib",
+        "//:tcl_readline_setup",
         "//bazel:tcl_library_init",
         "@rules_cc//cc/runfiles",
         "@tcl_lang//:tcl",
diff --git a/app/Main.cc b/app/Main.cc
index 44e30c07..272cb307 100644
--- a/app/Main.cc
+++ b/app/Main.cc
@@ -33,6 +33,7 @@
 
 #ifdef BAZEL_CURRENT_REPOSITORY
   #include "bazel/tcl_library_init.h"
+  #include "src/tcl_readline_setup.h"
 #endif
 
 #if TCL_READLINE
@@ -124,12 +125,18 @@ staTclAppInit(int argc,
   if (Tcl_Init(interp) == TCL_ERROR)
     return TCL_ERROR;
 
+  bool has_readline = false;
+#ifdef BAZEL_CURRENT_REPOSITORY
+  has_readline = (ord::SetupTclReadlineLibrary(interp) == TCL_OK);
+#endif
 #if TCL_READLINE
   if (Tclreadline_Init(interp) == TCL_ERROR)
     return TCL_ERROR;
   Tcl_StaticPackage(interp, "tclreadline", Tclreadline_Init, Tclreadline_SafeInit);
   if (Tcl_EvalFile(interp, TCLRL_LIBRARY "/tclreadlineInit.tcl") != TCL_OK)
     printf("Failed to load tclreadline.tcl\n");
+  else
+    has_readline = true;
 #endif
 
   initStaApp(argc, argv, interp);
@@ -167,11 +174,8 @@ staTclAppInit(int argc,
       }
     }
   }
-#if TCL_READLINE
-  return Tcl_Eval(interp, "::tclreadline::Loop");
-#else
-  return TCL_OK;
-#endif
+
+  return has_readline ? Tcl_Eval(interp, "::tclreadline::Loop") : TCL_OK;
 }
 
 static void