From 281408b4852ae74af28ecc8f1c03457c766136b8 Mon Sep 17 00:00:00 2001 From: Patrick Spek Date: Sun, 8 Jul 2018 17:37:25 +0200 Subject: Initial release --- t/indented-block.t | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100644 t/indented-block.t (limited to 't/indented-block.t') diff --git a/t/indented-block.t b/t/indented-block.t new file mode 100644 index 0000000..9acf5e6 --- /dev/null +++ b/t/indented-block.t @@ -0,0 +1,19 @@ +#! /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