From 3b340e8eb1256c80dca924088d7cdbacdfb9d223 Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Thu, 19 Feb 2026 10:43:02 +0100
Subject: [PATCH] revert back to previous version: The quotes in "Res=$res
 Cap=$cap" must be escaped with a backslash because the whole piece of tcl
 code is already inside author="...." quoted attribute.

---
 xschem_library/examples/test_backannotated_subckt.sch | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/xschem_library/examples/test_backannotated_subckt.sch b/xschem_library/examples/test_backannotated_subckt.sch
index 83a8ff82..5e92aa0b 100644
--- a/xschem_library/examples/test_backannotated_subckt.sch
+++ b/xschem_library/examples/test_backannotated_subckt.sch
@@ -74,7 +74,7 @@ if \{ [info commands calc_rc] eq \{\} \} \{
     proc calc_rc \{ L W \} \{
      if \{[catch \{expr 1200*$L/$W\} res]\} \{set res -1\}
      if \{[catch \{expr 1e-3*$W*$L\} cap]\} \{set cap -1\}
-     return \"Res=$res Cap=$cap\"
+     return \\"Res=$res Cap=$cap\\"
     \}
     puts [info body calc_rc]
     puts \{############\}