Recursively check equality for lists and pairs, improve function redefinition error message

test/tests/choice block.lua

@@ -5,12 +5,12 @@ _[19]={}
 _[18]={}
 _[17]={}
 _[16]={}
-_[15]={data="plop",tags=_[21]}
-_[14]={data="oh",tags=_[20]}
-_[13]={data="ho",tags=_[19]}
-_[12]={data="ok",tags=_[18]}
-_[11]={data="ne",tags=_[17]}
-_[10]={data="ye",tags=_[16]}
+_[15]={tags=_[21],data="plop"}
+_[14]={tags=_[20],data="oh"}
+_[13]={tags=_[19],data="ho"}
+_[12]={tags=_[18],data="ok"}
+_[11]={tags=_[17],data="ne"}
+_[10]={tags=_[16],data="ye"}
 _[9]={_[15]}
 _[8]={_[13],_[14]}
 _[7]={_[12]}

test/tests/choice function.lua

@@ -4,11 +4,11 @@ _[14]={}
 _[13]={}
 _[12]={}
 _[11]={}
-_[10]={data="ok",tags=_[15]}
-_[9]={data="neol",tags=_[14]}
-_[8]={data="oh",tags=_[13]}
-_[7]={data="neol",tags=_[12]}
-_[6]={data="ho",tags=_[11]}
+_[10]={tags=_[15],data="ok"}
+_[9]={tags=_[14],data="neol"}
+_[8]={tags=_[13],data="oh"}
+_[7]={tags=_[12],data="neol"}
+_[6]={tags=_[11],data="ho"}
 _[5]={_[10]}
 _[4]={_[6],_[7],_[8],_[9]}
 _[3]={"return"}

test/tests/choice simple.lua

@@ -2,9 +2,9 @@ local _={}
 _[11]={}
 _[10]={}
 _[9]={}
-_[8]={data="ok",tags=_[11]}
-_[7]={data="ne",tags=_[10]}
-_[6]={data="ye",tags=_[9]}
+_[8]={tags=_[11],data="ok"}
+_[7]={tags=_[10],data="ne"}
+_[6]={tags=_[9],data="ye"}
 _[5]={_[8]}
 _[4]={_[6],_[7]}
 _[3]={"return"}

test/tests/commit.lua

@@ -3,10 +3,10 @@ _[17]={}
 _[16]={}
 _[15]={}
 _[14]={}
-_[13]={data="parallel: 2",tags=_[17]}
-_[12]={data="after: 2",tags=_[16]}
-_[11]={data="parallel: 5",tags=_[15]}
-_[10]={data="before: 2",tags=_[14]}
+_[13]={tags=_[17],data="parallel: 2"}
+_[12]={tags=_[16],data="after: 2"}
+_[11]={tags=_[15],data="parallel: 5"}
+_[10]={tags=_[14],data="before: 2"}
 _[9]={_[13]}
 _[8]={_[12]}
 _[7]={_[11]}

test/tests/condition decorator.lua

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

test/tests/condition else false.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="ok",tags=_[5]}
+_[4]={tags=_[5],data="ok"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/condition else true.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="ok",tags=_[5]}
+_[4]={tags=_[5],data="ok"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/condition elseif false.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="ok",tags=_[5]}
+_[4]={tags=_[5],data="ok"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/condition elseif true.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="ok",tags=_[5]}
+_[4]={tags=_[5],data="ok"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/condition true.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="ok",tags=_[5]}
+_[4]={tags=_[5],data="ok"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/custom event.lua

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

test/tests/define override.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="a: 5",tags=_[5]}
+_[4]={tags=_[5],data="a: 5"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/equality operator.ans

@@ -0,0 +1,19 @@
+:(1:2) a
+
+0 = {a = (5:2)}
+
+0 = {a = (1:3)}
+
+1 = {a = (1:2)}
+
+:[1,2,3] b
+
+0 = {b = a}
+
+0 = {b = []}
+
+0 = {b = [3,1,2]}
+
+0 = {b = [1,2,3,4]}
+
+1 = {b = [1,2,3]}

test/tests/equality operator.lua

@@ -0,0 +1,70 @@
+local _={}
+_[33]={}
+_[32]={}
+_[31]={}
+_[30]={}
+_[29]={}
+_[28]={}
+_[27]={}
+_[26]={}
+_[25]={tags=_[33],data="1 = 1"}
+_[24]={tags=_[32],data="0 = 0"}
+_[23]={tags=_[31],data="0 = 0"}
+_[22]={tags=_[30],data="0 = 0"}
+_[21]={tags=_[29],data="0 = 0"}
+_[20]={tags=_[28],data="1 = 1"}
+_[19]={tags=_[27],data="0 = 0"}
+_[18]={tags=_[26],data="0 = 0"}
+_[17]={_[25]}
+_[16]={_[24]}
+_[15]={_[23]}
+_[14]={_[22]}
+_[13]={_[21]}
+_[12]={_[20]}
+_[11]={_[19]}
+_[10]={_[18]}
+_[9]={"return"}
+_[8]={"text",_[17]}
+_[7]={"text",_[16]}
+_[6]={"text",_[15]}
+_[5]={"text",_[14]}
+_[4]={"text",_[13]}
+_[3]={"text",_[12]}
+_[2]={"text",_[11]}
+_[1]={"text",_[10]}
+return {_[1],_[2],_[3],_[4],_[5],_[6],_[7],_[8],_[9]}
+--[[
+{ "text", { {
+      data = "0 = 0",
+      tags = {}
+    } } }
+{ "text", { {
+      data = "0 = 0",
+      tags = {}
+    } } }
+{ "text", { {
+      data = "1 = 1",
+      tags = {}
+    } } }
+{ "text", { {
+      data = "0 = 0",
+      tags = {}
+    } } }
+{ "text", { {
+      data = "0 = 0",
+      tags = {}
+    } } }
+{ "text", { {
+      data = "0 = 0",
+      tags = {}
+    } } }
+{ "text", { {
+      data = "0 = 0",
+      tags = {}
+    } } }
+{ "text", { {
+      data = "1 = 1",
+      tags = {}
+    } } }
+{ "return" }
+]]--

test/tests/function arg vararg.lua

@@ -1,8 +1,8 @@
 local _={}
 _[7]={}
 _[6]={}
-_[5]={data="[o, k]",tags=_[7]}
-_[4]={data="ok",tags=_[6]}
+_[5]={tags=_[7],data="[o, k]"}
+_[4]={tags=_[6],data="ok"}
 _[3]={_[4],_[5]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/function arg.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="ok",tags=_[5]}
+_[4]={tags=_[5],data="ok"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/function args vararg empty.lua

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

test/tests/function args vararg.lua

@@ -1,8 +1,8 @@
 local _={}
 _[7]={}
 _[6]={}
-_[5]={data="[o, k]",tags=_[7]}
-_[4]={data="ok",tags=_[6]}
+_[5]={tags=_[7],data="[o, k]"}
+_[4]={tags=_[6],data="ok"}
 _[3]={_[4],_[5]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/function args.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="ok",tags=_[5]}
+_[4]={tags=_[5],data="ok"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/function arity conflict.lua

@@ -1,6 +1,6 @@
 local _={}
-_[1]={"error","trying to define function function arity conflict.f with arity [2;2], but another function with the arity exist; at test/tests/function arity conflict.ans:5"}
+_[1]={"error","trying to define function function arity conflict.f with arity [2;2], but another function with the same name and arity exist; at test/tests/function arity conflict.ans:5"}
 return {_[1]}
 --[[
-{ "error", "trying to define function function arity conflict.f with arity [2;2], but another function with the arity exist; at test/tests/function arity conflict.ans:5" }
+{ "error", "trying to define function function arity conflict.f with arity [2;2], but another function with the same name and arity exist; at test/tests/function arity conflict.ans:5" }
 ]]--

test/tests/function cycle.lua

@@ -4,11 +4,11 @@ _[20]={}
 _[19]={}
 _[18]={}
 _[17]={}
-_[16]={data="b",tags=_[21]}
-_[15]={data="a",tags=_[20]}
-_[14]={data="c",tags=_[19]}
-_[13]={data="b",tags=_[18]}
-_[12]={data="a",tags=_[17]}
+_[16]={tags=_[21],data="b"}
+_[15]={tags=_[20],data="a"}
+_[14]={tags=_[19],data="c"}
+_[13]={tags=_[18],data="b"}
+_[12]={tags=_[17],data="a"}
 _[11]={_[16]}
 _[10]={_[15]}
 _[9]={_[14]}

test/tests/function next.lua

@@ -4,11 +4,11 @@ _[20]={}
 _[19]={}
 _[18]={}
 _[17]={}
-_[16]={data="c",tags=_[21]}
-_[15]={data="c",tags=_[20]}
-_[14]={data="c",tags=_[19]}
-_[13]={data="b",tags=_[18]}
-_[12]={data="a",tags=_[17]}
+_[16]={tags=_[21],data="c"}
+_[15]={tags=_[20],data="c"}
+_[14]={tags=_[19],data="c"}
+_[13]={tags=_[18],data="b"}
+_[12]={tags=_[17],data="a"}
 _[11]={_[16]}
 _[10]={_[15]}
 _[9]={_[14]}

test/tests/function random.lua

@@ -4,11 +4,11 @@ _[20]={}
 _[19]={}
 _[18]={}
 _[17]={}
-_[16]={data="a",tags=_[21]}
-_[15]={data="c",tags=_[20]}
-_[14]={data="c",tags=_[19]}
-_[13]={data="c",tags=_[18]}
-_[12]={data="b",tags=_[17]}
+_[16]={tags=_[21],data="a"}
+_[15]={tags=_[20],data="a"}
+_[14]={tags=_[19],data="b"}
+_[13]={tags=_[18],data="a"}
+_[12]={tags=_[17],data="b"}
 _[11]={_[16]}
 _[10]={_[15]}
 _[9]={_[14]}
@@ -27,15 +27,15 @@ return {_[1],_[2],_[3],_[4],_[5],_[6]}
       tags = {}
     } } }
 { "text", { {
-      data = "c",
+      data = "a",
       tags = {}
     } } }
 { "text", { {
-      data = "c",
+      data = "b",
       tags = {}
     } } }
 { "text", { {
-      data = "c",
+      data = "a",
       tags = {}
     } } }
 { "text", { {

test/tests/function return nested.lua

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

test/tests/function return.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="5",tags=_[5]}
+_[4]={tags=_[5],data="5"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/function scope.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="a: 5",tags=_[5]}
+_[4]={tags=_[5],data="a: 5"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/function ufcs arg.ans

@@ -1,4 +1,6 @@
 $ f(a)
 	{a}
 
+~ "ok".f
+
 ~ "ok".f()

test/tests/function ufcs arg.lua

@@ -1,11 +1,19 @@
 local _={}
-_[5]={}
-_[4]={data="ok",tags=_[5]}
-_[3]={_[4]}
-_[2]={"return"}
-_[1]={"text",_[3]}
-return {_[1],_[2]}
+_[9]={}
+_[8]={}
+_[7]={tags=_[9],data="ok"}
+_[6]={tags=_[8],data="ok"}
+_[5]={_[7]}
+_[4]={_[6]}
+_[3]={"return"}
+_[2]={"text",_[5]}
+_[1]={"text",_[4]}
+return {_[1],_[2],_[3]}
 --[[
+{ "text", { {
+      data = "ok",
+      tags = {}
+    } } }
 { "text", { {
       data = "ok",
       tags = {}

test/tests/function ufcs args.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="ok",tags=_[5]}
+_[4]={tags=_[5],data="ok"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/function vararg empty.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="[]",tags=_[5]}
+_[4]={tags=_[5],data="[]"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/function vararg.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="[o, k]",tags=_[5]}
+_[4]={tags=_[5],data="[o, k]"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/function.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="ok",tags=_[5]}
+_[4]={tags=_[5],data="ok"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/interrupt callback nested paragraph.lua

@@ -2,9 +2,9 @@ local _={}
 _[12]={}
 _[11]={}
 _[10]={}
-_[9]={data="no",tags=_[12]}
-_[8]={data="in interrupt: 5",tags=_[11]}
-_[7]={data="before: 2",tags=_[10]}
+_[9]={tags=_[12],data="no"}
+_[8]={tags=_[11],data="in interrupt: 5"}
+_[7]={tags=_[10],data="before: 2"}
 _[6]={_[8],_[9]}
 _[5]={_[7]}
 _[4]={"return"}

test/tests/interrupt callback nested.lua

@@ -1,8 +1,8 @@
 local _={}
 _[10]={}
 _[9]={}
-_[8]={data="in interrupt: 5",tags=_[10]}
-_[7]={data="before: 2",tags=_[9]}
+_[8]={tags=_[10],data="in interrupt: 5"}
+_[7]={tags=_[9],data="before: 2"}
 _[6]={_[8]}
 _[5]={_[7]}
 _[4]={"return"}

test/tests/interrupt callback.lua

@@ -1,8 +1,8 @@
 local _={}
 _[10]={}
 _[9]={}
-_[8]={data="in interrupt: 5",tags=_[10]}
-_[7]={data="before: 2",tags=_[9]}
+_[8]={tags=_[10],data="in interrupt: 5"}
+_[7]={tags=_[9],data="before: 2"}
 _[6]={_[8]}
 _[5]={_[7]}
 _[4]={"return"}

test/tests/interrupt no callback.lua

@@ -1,6 +1,6 @@
 local _={}
 _[6]={}
-_[5]={data="before: 2",tags=_[6]}
+_[5]={tags=_[6],data="before: 2"}
 _[4]={_[5]}
 _[3]={"return",""}
 _[2]={"wait",0}

test/tests/paragraph decorator scope explicit call.lua

@@ -1,8 +1,8 @@
 local _={}
 _[9]={}
 _[8]={}
-_[7]={data="a.\240\159\145\129\239\184\143: 1",tags=_[9]}
-_[6]={data="a.\240\159\145\129\239\184\143: 0",tags=_[8]}
+_[7]={tags=_[9],data="a.\240\159\145\129\239\184\143: 1"}
+_[6]={tags=_[8],data="a.\240\159\145\129\239\184\143: 0"}
 _[5]={_[7]}
 _[4]={_[6]}
 _[3]={"return"}

test/tests/paragraph decorator scope implicit call.lua

@@ -1,8 +1,8 @@
 local _={}
 _[7]={}
 _[6]={}
-_[5]={data="ok",tags=_[7]}
-_[4]={data="a.\240\159\145\129\239\184\143: 0",tags=_[6]}
+_[5]={tags=_[7],data="ok"}
+_[4]={tags=_[6],data="a.\240\159\145\129\239\184\143: 0"}
 _[3]={_[4],_[5]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/paragraph decorator scope.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="a.\240\159\145\129\239\184\143: 0",tags=_[5]}
+_[4]={tags=_[5],data="a.\240\159\145\129\239\184\143: 0"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/paragraph run force.lua

@@ -7,14 +7,14 @@ _[19]={}
 _[18]={}
 _[17]={}
 _[16]={}
-_[15]={data="b",tags=_[23]}
-_[14]={data="x",tags=_[22]}
-_[13]={data="Force no checkpoint:",tags=_[21]}
-_[12]={data="b",tags=_[20]}
-_[11]={data="a",tags=_[19]}
-_[10]={data="From checkpoint:",tags=_[18]}
-_[9]={data="a",tags=_[17]}
-_[8]={data="Force run checkpoint:",tags=_[16]}
+_[15]={tags=_[23],data="b"}
+_[14]={tags=_[22],data="x"}
+_[13]={tags=_[21],data="Force no checkpoint:"}
+_[12]={tags=_[20],data="b"}
+_[11]={tags=_[19],data="a"}
+_[10]={tags=_[18],data="From checkpoint:"}
+_[9]={tags=_[17],data="a"}
+_[8]={tags=_[16],data="Force run checkpoint:"}
 _[7]={_[13],_[14],_[15]}
 _[6]={_[10],_[11],_[12]}
 _[5]={_[8],_[9]}

test/tests/paragraph run from.lua

@@ -8,15 +8,15 @@ _[20]={}
 _[19]={}
 _[18]={}
 _[17]={}
-_[16]={data="b",tags=_[25]}
-_[15]={data="x",tags=_[24]}
-_[14]={data="Force no checkpoint:",tags=_[23]}
-_[13]={data="b",tags=_[22]}
-_[12]={data="a",tags=_[21]}
-_[11]={data="From checkpoint:",tags=_[20]}
-_[10]={data="b",tags=_[19]}
-_[9]={data="a",tags=_[18]}
-_[8]={data="Force run from checkpoint:",tags=_[17]}
+_[16]={tags=_[25],data="b"}
+_[15]={tags=_[24],data="x"}
+_[14]={tags=_[23],data="Force no checkpoint:"}
+_[13]={tags=_[22],data="b"}
+_[12]={tags=_[21],data="a"}
+_[11]={tags=_[20],data="From checkpoint:"}
+_[10]={tags=_[19],data="b"}
+_[9]={tags=_[18],data="a"}
+_[8]={tags=_[17],data="Force run from checkpoint:"}
 _[7]={_[14],_[15],_[16]}
 _[6]={_[11],_[12],_[13]}
 _[5]={_[8],_[9],_[10]}

test/tests/paragraph run.lua

@@ -8,15 +8,15 @@ _[20]={}
 _[19]={}
 _[18]={}
 _[17]={}
-_[16]={data="b",tags=_[25]}
-_[15]={data="x",tags=_[24]}
-_[14]={data="Force no checkpoint:",tags=_[23]}
-_[13]={data="b",tags=_[22]}
-_[12]={data="a",tags=_[21]}
-_[11]={data="From checkpoint:",tags=_[20]}
-_[10]={data="b",tags=_[19]}
-_[9]={data="x",tags=_[18]}
-_[8]={data="No checkpoint:",tags=_[17]}
+_[16]={tags=_[25],data="b"}
+_[15]={tags=_[24],data="x"}
+_[14]={tags=_[23],data="Force no checkpoint:"}
+_[13]={tags=_[22],data="b"}
+_[12]={tags=_[21],data="a"}
+_[11]={tags=_[20],data="From checkpoint:"}
+_[10]={tags=_[19],data="b"}
+_[9]={tags=_[18],data="x"}
+_[8]={tags=_[17],data="No checkpoint:"}
 _[7]={_[14],_[15],_[16]}
 _[6]={_[11],_[12],_[13]}
 _[5]={_[8],_[9],_[10]}

test/tests/paragraph.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="b",tags=_[5]}
+_[4]={tags=_[5],data="b"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/tag decorator empty.lua

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

test/tests/tag decorator nested.lua

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

test/tests/tag decorator.lua

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

test/tests/tag empty.lua

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

test/tests/tag.lua

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

test/tests/text beak.lua

@@ -1,22 +0,0 @@
-local _={}
-_[9]={}
-_[8]={}
-_[7]={data="b c",tags=_[9]}
-_[6]={data="a",tags=_[8]}
-_[5]={_[7]}
-_[4]={_[6]}
-_[3]={"return"}
-_[2]={"text",_[5]}
-_[1]={"text",_[4]}
-return {_[1],_[2],_[3]}
---[[
-{ "text", { {
-      data = "a",
-      tags = {}
-    } } }
-{ "text", { {
-      data = "b c",
-      tags = {}
-    } } }
-{ "return" }
-]]--

test/tests/text block.lua

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

test/tests/text break.lua

@@ -1,23 +1,22 @@
 local _={}
+_[9]={}
 _[8]={}
-_[7]={}
-_[6]={data="b c",tags=_[8]}
-_[5]={data="a",tags=_[7]}
-_[4]={type="string",value=""}
-_[3]={_[5],_[6]}
-_[2]={"return",_[4]}
-_[1]={"text",_[3]}
-return {_[1],_[2]}
+_[7]={tags=_[9],data="b c"}
+_[6]={tags=_[8],data="a"}
+_[5]={_[7]}
+_[4]={_[6]}
+_[3]={"return"}
+_[2]={"text",_[5]}
+_[1]={"text",_[4]}
+return {_[1],_[2],_[3]}
 --[[
 { "text", { {
       data = "a",
       tags = {}
-    }, {
+    } } }
+{ "text", { {
       data = "b c",
       tags = {}
     } } }
-{ "return", {
-    type = "string",
-    value = ""
-  } }
+{ "return" }
 ]]--

test/tests/text format.lua

@@ -1,6 +1,6 @@
 local _={}
 _[5]={}
-_[4]={data="a: 5",tags=_[5]}
+_[4]={tags=_[5],data="a: 5"}
 _[3]={_[4]}
 _[2]={"return"}
 _[1]={"text",_[3]}

test/tests/text.lua

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

test/tests/unseen line.lua

@@ -4,11 +4,11 @@ _[12]={}
 _[11]={}
 _[10]={}
 _[9]={}
-_[8]={data="b",tags=_[13]}
-_[7]={data="a",tags=_[12]}
-_[6]={data="b",tags=_[11]}
-_[5]={data="seen only once",tags=_[10]}
-_[4]={data="a",tags=_[9]}
+_[8]={tags=_[13],data="b"}
+_[7]={tags=_[12],data="a"}
+_[6]={tags=_[11],data="b"}
+_[5]={tags=_[10],data="seen only once"}
+_[4]={tags=_[9],data="a"}
 _[3]={_[4],_[5],_[6],_[7],_[8]}
 _[2]={"return"}
 _[1]={"text",_[3]}