aUCBLogo Demos and Tests / testrunsecure

be testrunsecure
   docommands=[rboxdemo]
   username="guest
;   catch "error [
      (runSecure
         security_dlcall
         +security_iodll
         +security_shell
         +security_filewrite
         ;+security_fileread
         ;+security_dirs
         +security_thread
         ;+security_keyboard
         +security_gui
         ;+security_erase
         +security_buried
         +security_namespace
         docommands
         1024   ;stack size (in bytes)
         100000   ;graphic record size (in graphic primitives)
         1000000   ;memory size (in bytes)
         65536   ;max. number of nodes
         7000   ;timeout (in milliseconds)
;         username
;         [username]
         ; ^-- get pushed on the varStack in Namespace username
      )
;  runSecure is not allowed to use less security
;   ]
end