From 5c08ac89fe297a2e69a19732bde338da1a759eb8 Mon Sep 17 00:00:00 2001 From: P. J. McDermott Date: Thu, 05 Jan 2017 20:16:51 -0500 Subject: t/00_compile.t: Rename to t/01_compile.t --- (limited to 't/00_compile.t') diff --git a/t/00_compile.t b/t/00_compile.t deleted file mode 100644 index 18032f8..0000000 --- a/t/00_compile.t +++ /dev/null @@ -1,51 +0,0 @@ -# t/00_compile.t - Script compilation tests -# -# Copyright (C) 2016 Libiquity LLC -# -# This program is free software: you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation, either version 3 of the License, or -# (at your option) any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this program. If not, see . - -use strict; -use warnings; - -use Test::More; -use Test::Script; - -my $scripts; -my $script; - -sub find_scripts -{ - my $manifest_fh; - my $file; - my $scripts = []; - - open($manifest_fh, "<", "MANIFEST"); - while ($file = readline($manifest_fh)) { - chomp($file); - if ($file =~ m@^(bin|lib)/@) { - push(@$scripts, $file); - } - } - close($manifest_fh); - - return $scripts; -} - -$scripts = find_scripts(); - -plan("tests" => @{$scripts} + 0); - -for $script (@{$scripts}) { - script_compiles($script); -} -- cgit v0.9.1