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

test/tests/tag.lua

@@ -2,21 +2,21 @@ local _={}
 _[8]={2,3}
 _[7]={1,a=_[8]}
 _[6]={1}
-_[5]={data="bar",tags=_[7]}
-_[4]={data="foo",tags=_[6]}
+_[5]={tags=_[7],text="bar"}
+_[4]={tags=_[6],text="foo"}
 _[3]={_[4],_[5]}
 _[2]={"return"}
 _[1]={"text",_[3]}
 return {_[1],_[2]}
 --[[
 { "text", { {
-      data = "foo",
-      tags = { 1 }
+      tags = { 1 },
+      text = "foo"
     }, {
-      data = "bar",
       tags = { 1,
         a = { 2, 3 }
-      }
+      },
+      text = "bar"
     } } }
 { "return" }
 ]]--