vocabs.metadata: wrap test in a with-manifest to ensure there's a manifest. Fixes #1463.

db4
Doug Coleman 2015-08-27 22:27:54 -07:00
parent 2a520191e1
commit b2a51dfeb2
1 changed files with 8 additions and 6 deletions

View File

@ -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