lua tests

Perryvw · Perryvw · commit fff847b2aadc · 2018-02-04T21:56:03.000+01:00
diff --git a/dist/lualib/typescript.lua b/dist/lualib/typescript.lua
@@ -32,9 +32,11 @@ function TS_filter(list, func)
 end
 
 function TS_slice(list, startI, endI)
-    endI = endI or (#list-1)
+    endI = endI or #list
+    if startI < 0 then startI = #list + startI end
+    if endI < 0 then endI = #list + endI end
     local out = {}
-    for i = startI + 1, endI + 1 do
+    for i = startI + 1, endI do
         table.insert(out, list[i])
     end
     return out
diff --git a/package-lock.json b/package-lock.json
diff --git a/package.json b/package.json
@@ -1,6 +1,7 @@
 {
     "dependencies": {
         "alsatian": "^2.1.0",
+        "lua.vm.js": "0.0.1",
         "typescript": "^2.7.1"
     }
 }
diff --git a/test/integration/lua/lualib.spec.ts b/test/integration/lua/lualib.spec.ts
@@ -0,0 +1,54 @@
+import { Expect, Test, TestCase } from "alsatian";
+
+import * as ts from "typescript";
+import {LuaTranspiler, TranspileError} from "../../../dist/Transpiler";
+
+const LuaVM = require("lua.vm.js");
+const fs = require("fs");
+
+const dummyArrayType = { flags: ts.TypeFlags.Object, symbol: {escapedName: "Array"}};
+let dummyType = {};
+const dummyChecker = {getTypeAtLocation: function() {return dummyType;}}
+function transpileString(str: string): string {
+    const file = ts.createSourceFile("", str, ts.ScriptTarget.Latest);
+    const result = LuaTranspiler.transpileSourceFile(file, dummyChecker, false);
+    return result.trim();
+}
+function executeLua(lua: string): string {
+    const luavm = new LuaVM.Lua.State();
+    return luavm.execute(lua)[0];
+}
+
+const lualib = fs.readFileSync("dist/lualib/typescript.lua") + "\n";
+
+const toStringDef = "function ToString(list)\n"+
+    "local result = \"\"\n" +
+    "for i=1,#list do result = result .. list[i]\n" +
+    "if i < #list then result = result .. ',' end end\n"+
+    "return result end\n";
+
+export class LuaTests {
+
+    @TestCase([0,1,2,3], 1, 2)
+    @TestCase([0,1,2,3], 1, 1)
+    @TestCase([0,1,2,3], 1, -1)
+    @TestCase([0,1,2,3], -3, -1)
+    @TestCase([0,1,2,3,4,5], 1, 3)
+    @TestCase([0,1,2,3,4,5], 3)
+    @Test("array.slice")
+    public slice<T>(inp: T[], start: number, end?: number) {
+        // Make typechecker return array type
+        dummyType = dummyArrayType;
+        // Transpile
+        let lua = transpileString(`return ToString([${inp.toString()}].slice(${start}, ${end}))`);
+
+        // Add library
+        lua = toStringDef + lualib + lua;
+
+        // Execute
+        let result = executeLua(lua);
+
+        // Assert
+        Expect(result).toBe(inp.slice(start, end).toString());
+    }
+}
diff --git a/test/tsconfig.json b/test/tsconfig.json
@@ -1,6 +1,5 @@
 {
     "compilerOptions": {
         "experimentalDecorators": true
-    },
-    "exclude": ["integration/**/*"]
+    }
 }

Original file line number	Diff line number	Diff line change
`@@ -1,6 +1,7 @@`
`1`	`1`	`{`
`2`	`2`	`"dependencies": {`
`3`	`3`	`"alsatian": "^2.1.0",`
	`4`	`+ "lua.vm.js": "0.0.1",`
`4`	`5`	`"typescript": "^2.7.1"`
`5`	`6`	`}`
`6`	`7`	`}`
Original file line number	Diff line number	Diff line change
`@@ -1,6 +1,5 @@`
`1`	`1`	`{`
`2`	`2`	`"compilerOptions": {`
`3`	`3`	`"experimentalDecorators": true`
`4`		`- },`
`5`		`- "exclude": ["integration/*/"]`
	`4`	`+ }`
`6`	`5`	`}`