more inner-syntax markup;
authorwenzelm
Fri, 25 Oct 2024 11:31:16 +0200
changeset 81257 be68bb67140d
parent 81253 bbed9f218158
child 81258 74647c464cbd
more inner-syntax markup;
src/HOL/ex/Code_Lazy_Demo.thy
--- a/src/HOL/ex/Code_Lazy_Demo.thy	Thu Oct 24 22:05:57 2024 +0200
+++ b/src/HOL/ex/Code_Lazy_Demo.thy	Fri Oct 25 11:31:16 2024 +0200
@@ -113,7 +113,8 @@
   = L              (\<open>\<spadesuit>\<close>) 
   | Node tree tree (infix \<open>\<triangle>\<close> 900)
 
-notation (output) Node (\<open>\<triangle>(//\<^bold>l: _//\<^bold>r: _)\<close>)
+notation (output) Node
+  (\<open>(\<open>indent=1 notation=\<open>mixfix tree node\<close>\<close>\<triangle>//(\<open>open_block notation=\<open>mixfix tree branch\<close>\<close>\<^bold>l: _)//(\<open>open_block notation=\<open>mixfix tree branch\<close>\<close>\<^bold>r: _))\<close>)
 
 code_lazy_type tree