diff options
author | juehv <heuschkel@tk.tu-darmstadt.de> | 2016-11-28 12:07:19 (GMT) |
---|---|---|
committer | juehv <heuschkel@tk.tu-darmstadt.de> | 2016-11-28 12:07:19 (GMT) |
commit | df10e16889b3a0429b992bdbb8ad119f553f1801 (patch) | |
tree | 11d4ba355657fd36b978652662c6fde45046a98b /test/w3c | |
parent | e7c0fbce1c1a5b4fe327c6a1e551c347bb30a332 (diff) | |
download | uscxml-df10e16889b3a0429b992bdbb8ad119f553f1801.zip uscxml-df10e16889b3a0429b992bdbb8ad119f553f1801.tar.gz uscxml-df10e16889b3a0429b992bdbb8ad119f553f1801.tar.bz2 |
fix directory parameter
Diffstat (limited to 'test/w3c')
-rwxr-xr-x | test/w3c/create-test-table.pl | 22 |
1 files changed, 13 insertions, 9 deletions
diff --git a/test/w3c/create-test-table.pl b/test/w3c/create-test-table.pl index feda8a0..3535407 100755 --- a/test/w3c/create-test-table.pl +++ b/test/w3c/create-test-table.pl @@ -9,24 +9,28 @@ use Cwd 'abs_path'; my $ctest = 'ctest'; # we assume it to be in the path -my $possibleBuildDir = shift | "../../build/cli"; +my $possibleBuildDir = "../../build/cli"; +if (@ARGV>0) { + $possibleBuildDir = $ARGV[0]; +} +#print $possibleBuildDir; chdir dirname(abs_path($0)) or die($!); my $manifest = XMLin("manifest.xml"); -if (-d $possibleBuildDir) { +#if (-d $possibleBuildDir) { chdir $possibleBuildDir or die($!); -} +#} my %testClasses = ( 'w3c/ecma' => 'ECMA', -'w3c/lua' => 'Lua', -'w3c/namespace' => 'NS', -'w3c/promela' => 'Promela', +#'w3c/lua' => 'Lua', +#'w3c/namespace' => 'NS', +#'w3c/promela' => 'Promela', # 'w3c/c89' => 'C89', -'w3c/gen/c/ecma' => 'C (ECMA)', -'w3c/gen/c/lua' => 'C (Lua)', +#'w3c/gen/c/ecma' => 'C (ECMA)', +#'w3c/gen/c/lua' => 'C (Lua)', # 'w3c/binding/java/jexl' => 'JEXL', -'w3c/spin/promela' => 'Spin' +#'w3c/spin/promela' => 'Spin' ); my %specClass = ( |