From b2a51dfeb2bc721c0c908d3f0fa56ddf9202d06c Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Thu, 27 Aug 2015 22:27:54 -0700 Subject: [PATCH] vocabs.metadata: wrap test in a with-manifest to ensure there's a manifest. Fixes #1463. --- basis/vocabs/metadata/metadata-tests.factor | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) diff --git a/basis/vocabs/metadata/metadata-tests.factor b/basis/vocabs/metadata/metadata-tests.factor index 0f248b63771..7e8b0a9a571 100644 --- a/basis/vocabs/metadata/metadata-tests.factor +++ b/basis/vocabs/metadata/metadata-tests.factor @@ -5,10 +5,12 @@ IN: vocabs.metadata : wrong-platform-vocab-name ( -- name ) os windows? "unix" "windows" ? ; -[ wrong-platform-vocab-name use-vocab ] -[ error>> unsupported-platform? ] must-fail-with +[ + [ wrong-platform-vocab-name use-vocab ] + [ error>> unsupported-platform? ] must-fail-with -! Factor remembers that we tried to load the wrong vocab -! and this breaks f2 until we forget the vocab. -! See issue #1463. -[ wrong-platform-vocab-name forget-vocab ] try + ! Factor remembers that we tried to load the wrong vocab + ! and this breaks f2 until we forget the vocab. + ! See issue #1463. + [ wrong-platform-vocab-name forget-vocab ] try +] with-manifest