From bd0e07fbe7c08d055cfbc3a5127020f4368344bc Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Mon, 22 Sep 2025 12:06:12 +0200
Subject: [PATCH] proc graph_tag_nodes: better tagging of multi-line nodes that
 use escaped newlines

---
 src/xschem.tcl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/xschem.tcl b/src/xschem.tcl
index 020e03c8..d0aa5cff 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -3173,6 +3173,8 @@ proc graph_tag_nodes {txt} {
 
 
   set start 0
+  # transform escaped newlines into two spaces, so tagging of multiline nodes is simpler
+  regsub -all "\\\\\n" $txt {  } txt
   if {[regexp {^tcleval\(} $txt]} {
     set start 8
     regsub {\)[ \n]*$} $txt {} txt