steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

tools.deploy: delete all cached staging images in deploy tests.

John Benediktsson 2012-06-19 17:13:45 -07:00
parent cd01766de9
commit aac9ddbf3a
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
basis/tools/deploy/deploy-tests.factor
View File

@ -6,6 +6,15 @@ urls math.parser io.directories tools.deploy tools.deploy.test
vocabs ; vocabs ;
IN: tools.deploy.tests IN: tools.deploy.tests
! Delete all cached staging images in case syntax or
! other core vocabularies have changed and staging
! images are stale.
cache-directory [
[ "staging." head? ] filter
my-arch ".image" append [ tail? ] curry filter
[ delete-file ] each
] with-directory-files
[ "nosuchvocab" deploy ] [ no-vocab? ] must-fail-with [ "nosuchvocab" deploy ] [ no-vocab? ] must-fail-with
[ "no such vocab, fool!" deploy ] [ bad-vocab-name? ] must-fail-with [ "no such vocab, fool!" deploy ] [ bad-vocab-name? ] must-fail-with