Handle events in text interpolation; capture text events in choice lines; improve test script

test/tests/function decorator scope implicit call.lua

@@ -1,37 +1,45 @@
 local _={}
+_[17]={}
+_[16]={}
 _[15]={}
 _[14]={}
 _[13]={}
-_[12]={}
-_[11]={}
-_[10]={data="ok",tags=_[15]}
-_[9]={data="a.\240\159\145\129\239\184\143: 1",tags=_[14]}
-_[8]={data="ko",tags=_[13]}
-_[7]={data="In function:",tags=_[12]}
-_[6]={data="a.\240\159\145\129\239\184\143: 0",tags=_[11]}
-_[5]={_[7],_[8],_[9],_[10]}
-_[4]={_[6]}
+_[12]={tags=_[17],text="ok"}
+_[11]={tags=_[16],text="1"}
+_[10]={tags=_[16],text="a.\240\159\145\129\239\184\143: "}
+_[9]={tags=_[15],text="ko"}
+_[8]={tags=_[14],text="In function:"}
+_[7]={tags=_[13],text="0"}
+_[6]={tags=_[13],text="a.\240\159\145\129\239\184\143: "}
+_[5]={_[8],_[9],_[10],_[11],_[12]}
+_[4]={_[6],_[7]}
 _[3]={"return"}
 _[2]={"text",_[5]}
 _[1]={"text",_[4]}
 return {_[1],_[2],_[3]}
 --[[
 { "text", { {
-      data = "a.👁️: 0",
-      tags = {}
+      tags = <1>{},
+      text = "a.👁️: "
+    }, {
+      tags = <table 1>,
+      text = "0"
     } } }
 { "text", { {
-      data = "In function:",
-      tags = {}
+      tags = {},
+      text = "In function:"
     }, {
-      data = "ko",
-      tags = {}
+      tags = {},
+      text = "ko"
     }, {
-      data = "a.👁️: 1",
-      tags = {}
+      tags = <1>{},
+      text = "a.👁️: "
     }, {
-      data = "ok",
-      tags = {}
+      tags = <table 1>,
+      text = "1"
+    }, {
+      tags = {},
+      text = "ok"
     } } }
 { "return" }
 ]]--