Sintaxe Just

Se o último operando à direita for um valor diferente de Nil, o operando à esquerda recebe-o.

Definição Formal

just ::= Just <ident> -> <ident> Receives <expr>

Exemplos

1
2
3
4
5
6
7
#include "prelude.ch"

Function TestJust( /* all optional */ nX, nY, nZ )
   Just M->X Receives nX
   Just M->Y Receives nY
   Just M->Z Receives nZ
   Return