Delegates: Difference between revisions

Added Mathematica
m (→‎{{header|ALGOL 68}}: fixed header)
(Added Mathematica)
Line 1,072:
String3 == 'delegate implementation'
)).</lang>
 
=={{header|Mathematica}}==
<lang Mathematica>delegator[del_]@operate :=
If[StringQ[del@operate], del@operate, "default implementation"];
del1 = Null;
del2@banana = "phone";
del3@operate = "delegate implementation";
Print[delegator[#]@operate] & /@ {del1, del2, del3};</lang>
{{out}}
<pre>default implementation
default implementation
delegate implementation</pre>
 
=={{header|Objective-C}}==