Anonymous user
Compound data type: Difference between revisions
Added PicoLisp
m (Unicon/Icon consistency 2) |
(Added PicoLisp) |
||
Line 548:
$point = new Point(1, 2);
echo $point; # will call __tostring() in later releases of PHP 5.2; before that, it won't work so good.</lang>
=={{header|PicoLisp}}==
<lang PicoLisp>(class +Point)
(dm T (X Y)
(=: x X)
(=: y Y) )
(setq P (new '(+Point) 3 4))
(show P)</lang>
Output:
<pre>$52717735311266 (+Point)
y 4
x 3</pre>
=={{header|PL/I}}==
| |||