SET-USER-NAME str
在 system/user/name 中设置用户名
SET-USER-NAME 是一个函数值。
set-user-name: func [str [string!]][system/user/name: str]