Discard returns values from choices

test/tests/return in choice.ans

@@ -0,0 +1,10 @@
+$ f
+	> a
+		x
+		@1
+		y
+	@2
+
+~ f = 2
+	~ choose(1)
+	Yes.

test/tests/return in choice.lua

@@ -0,0 +1,30 @@
+local _={}
+_[13]={}
+_[12]={}
+_[11]={}
+_[10]={data="Yes.",tags=_[13]}
+_[9]={data="x",tags=_[12]}
+_[8]={data="a",tags=_[11]}
+_[7]={_[10]}
+_[6]={_[9]}
+_[5]={_[8]}
+_[4]={"return"}
+_[3]={"text",_[7]}
+_[2]={"text",_[6]}
+_[1]={"choice",_[5]}
+return {_[1],_[2],_[3],_[4]}
+--[[
+{ "choice", { {
+      data = "a",
+      tags = {}
+    } } }
+{ "text", { {
+      data = "x",
+      tags = {}
+    } } }
+{ "text", { {
+      data = "Yes.",
+      tags = {}
+    } } }
+{ "return" }
+]]--