From 8e2a415bdc64580c40cfb21009f1d54b670a3594 Mon Sep 17 00:00:00 2001 From: Joe Thornber Date: Thu, 5 Oct 2017 16:18:42 +0100 Subject: [PATCH] [functional-tests] Fix *_check/tiny-input-file --- functional-tests/cache-functional-tests.scm | 6 +++--- functional-tests/era-functional-tests.scm | 6 +++--- functional-tests/thin-functional-tests.scm | 6 +++--- 3 files changed, 9 insertions(+), 9 deletions(-) diff --git a/functional-tests/cache-functional-tests.scm b/functional-tests/cache-functional-tests.scm index 62d39d5..1e47be3 100644 --- a/functional-tests/cache-functional-tests.scm +++ b/functional-tests/cache-functional-tests.scm @@ -134,9 +134,9 @@ (run-fail "cache_check" md)))) (define-scenario (cache-check tiny-metadata) - "Prints helpful message in case XML metadata given" - (with-cache-xml (xml) - (receive (_ stderr) (run-fail "cache_check" xml) + "Prints helpful message in case tiny metadata given" + (with-temp-file-sized ((md "cache.bin" 1024)) + (receive (_ stderr) (run-fail "cache_check" md) (assert-starts-with "Metadata device/file too small. Is this binary metadata?" stderr)))) (define-scenario (cache-check spot-accidental-xml-data) diff --git a/functional-tests/era-functional-tests.scm b/functional-tests/era-functional-tests.scm index 82409a0..bc25c1f 100644 --- a/functional-tests/era-functional-tests.scm +++ b/functional-tests/era-functional-tests.scm @@ -108,9 +108,9 @@ (assert-eof stderr)))) (define-scenario (era-check tiny-metadata) - "Prints helpful message in case XML metadata given" - (with-era-xml (xml) - (receive (_ stderr) (run-fail "era_check" xml) + "Prints helpful message in case tiny metadata given" + (with-temp-file-sized ((md "era.bin" 1024)) + (receive (_ stderr) (run-fail "era_check" md) (assert-starts-with "Metadata device/file too small. Is this binary metadata?" stderr)))) (define-scenario (era-check spot-accidental-xml-data) diff --git a/functional-tests/thin-functional-tests.scm b/functional-tests/thin-functional-tests.scm index 1f04045..628989f 100644 --- a/functional-tests/thin-functional-tests.scm +++ b/functional-tests/thin-functional-tests.scm @@ -114,9 +114,9 @@ (thin-check "--clear-needs-check-flag" md))) (define-scenario (thin-check tiny-metadata) - "Prints helpful message in case XML metadata given" - (with-thin-xml (xml) - (receive (_ stderr) (run-fail "thin_check" xml) + "Prints helpful message in case tiny metadata given" + (with-temp-file-sized ((md "thin.bin" 1024)) + (receive (_ stderr) (run-fail "thin_check" md) (assert-starts-with "Metadata device/file too small. Is this binary metadata?" stderr)))) (define-scenario (thin-check spot-accidental-xml-data)