wscript: Implemented Host_get_ScriptFullName.
[wine] / programs / wscript / tests / run.js
1 /*
2  * Copyright 2011 Jacek Caban for CodeWeavers
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17  */
18
19 var winetest = new ActiveXObject("Wine.Test");
20
21 function ok(expr, msg) {
22     winetest.ok(expr, msg);
23 }
24
25 ok(typeof(WScript) === "object", "typeof(WScript) = " + typeof(WScript));
26 ok(typeof(WSH) === "object", "typeof(WSH) = " + typeof(WSH));
27 ok(WScript === WSH, "WScript !== WSH");
28 ok(WScript.Name === "Windows Script Host", "WScript.Name = " + WScript.Name);
29 ok(typeof(WScript.Version) === "string", "typeof(WScript.Version) = " + typeof(WScript.Version));
30 ok(typeof(WScript.BuildVersion) === "number", "typeof(WScript.BuldVersion) = " + typeof(WScript.BuldVersion));
31 ok(WScript.FullName === winetest.wscriptFullName, "WScript.FullName = ", WScript.FullName);
32 ok(WScript.Path === winetest.wscriptPath, "WScript.Path = ", WScript.Path);
33 ok(WScript.ScriptName === winetest.wscriptScriptName, "WScript.ScriptName = " + WScript.ScriptName);
34 ok(WScript.ScriptFullName === winetest.wscriptScriptFullName, "WScript.ScriptFullName = " + WScript.ScriptFullName);
35
36 winetest.reportSuccess();