1 ! Copyright (C) 2009 Maxim Savchenko.
2 ! See http://factorcode.org/license.txt for BSD license.
4 USING: kernel sequences assocs namespaces lexer vocabs.parser sandbox ;
9 ERROR: sandbox-error vocab ;
11 : sandbox-use+ ( alias -- )
12 dup whitelist get at [ add-use ] [ sandbox-error ] ?if ;
16 SYNTAX: APPLY: scan sandbox-use+ ;
18 SYNTAX: APPLYING: ";" parse-tokens [ sandbox-use+ ] each ;
22 HEX: OCT: BIN: f t CHAR: "