tools.deploy.backend: fix vocab manifest parse

We were absent-mindedly passing the VOCABS: line off as a vocab name itself. vocabs.loader doesn't put up with that anymore.
db4
Joe Groff 2011-11-06 18:57:12 -08:00
parent c731dc6edb
commit 4c197ec6e6
1 changed files with 5 additions and 4 deletions

View File

@ -113,10 +113,11 @@ DEFER: ?make-staging-image
] bind ;
: parse-vocab-manifest-file ( path -- vocab-manifest )
utf8 file-lines
dup first "VOCABS:" =
[ { "LIBRARIES:" } split1 vocab-manifest boa ]
[ "invalid vocab manifest!" throw ] if ;
utf8 file-lines [ "empty vocab manifest!" throw ] [
unclip-slice "VOCABS:" =
[ { "LIBRARIES:" } split1 vocab-manifest boa ]
[ "invalid vocab manifest!" throw ] if
] if-empty ;
: make-deploy-image ( vm image vocab config -- manifest )
make-boot-image