1
variable_symbol
SETCF '
function-name
' 2? 2+ 2 ,
character_value