From f902fa2cc62c60aa614ef7efb60bde0d1c9d2e15 Mon Sep 17 00:00:00 2001 From: Patrick Spek Date: Mon, 5 Aug 2019 15:26:46 +0200 Subject: Rewrite String::Fold --- t/indented-block.t | 19 ------------------- 1 file changed, 19 deletions(-) delete mode 100644 t/indented-block.t (limited to 't/indented-block.t') diff --git a/t/indented-block.t b/t/indented-block.t deleted file mode 100644 index 9acf5e6..0000000 --- a/t/indented-block.t +++ /dev/null @@ -1,19 +0,0 @@ -#! /usr/bin/env perl6 - -use v6.c; - -use String::Fold; -use Test; - -my @result-lines = fold(slurp("t/files/input/indented-block.txt"), :indent(8)).lines; -my @expected-lines = slurp("t/files/output/indented-block.txt").trim-trailing.lines; - -plan 1 + @expected-lines.elems; - -is @result-lines.elems, @expected-lines.elems, "Expected number of lines"; - -for ^@expected-lines { - is @result-lines[$_], @expected-lines[$_], "Line {$_ + 1} is the same"; -} - -# vim: ft=perl6 noet -- cgit v1.1