Add test for file writing

Author: waschik

oslib_test.go

@@ -0,0 +1,33 @@
+package lua
+
+import (
+	"testing"
+)
+
+// correctly gc-ed. There was a bug in gopher lua where local vars were not being gc-ed in all circumstances.
+func TestOsWrite(t *testing.T) {
+	s := `
+		local function write(filename, content)
+		local f = assert(io.open(filename, "w"))
+		  f:write(content)
+		  assert(f:close())
+		end
+
+		local filename = os.tmpname()
+		write(filename, "abc")
+		write(filename, "d")
+		local f = assert(io.open(filename, "r"))
+		local content = f:read("*all"):gsub("%s+", "")
+		f:close()
+		os.remove(filename)
+		local expected = "d"
+		if content ~= expected then
+			error(string.format("Invalid content: Expecting \"%s\", got \"%s\"", expected, content))
+		end
+`
+	L := NewState()
+	defer L.Close()
+	if err := L.DoString(s); err != nil {
+		t.Error(err)
+	}
+}