f1: func [a][print a]
f2: func ['a][print a]
f3: func ['a][print :a]
f4: func ['a][print get a]

; divers tests :
; 1) avec une valeur directe
>> f1 "toto"
toto
>> f2 "toto"
toto
>> f3 "toto"
toto
>> f4 "toto"
** Script Error: get expected word argument of type: any-word object none
** Where: f4
** Near: print get a

; 2) on passe par une "variable" (valeur indirecte) :
>> a: "titi"
== "titi"
>> f1 a
titi
>> f2 a
a
>> f3 a
a
>> f4 a
titi

; 3) valeur indirecte, mais explicitement non réduite (indépendament de ce qui est défini dans la fonction) :
>> f1 'a
a
>> f2 'a
a
>> f3 'a
a
>> f4 'a
titi