Parametric polymorphism: Difference between revisions

{5,6,7,"apples","oranges"}

</pre>

Note that tmap has to be a function rather than a procedure with a reference parameter, but this still achieves

pass-by-reference/in-situ updates, mainly because root is a local rather than global/static, and is the target

of (aka assigned to/overwritten on return from) the top-level tmap() call, and yet it would also manage the

<lang Phix>enum data, left, right

 

object root = newnode(1.00)

-- Add some nodes.

-- Now the tree has seven nodes.

ppOpt({pp_Nest,2})

pp(root)

root = tmap(root,routine_id("add10"))

 

pp(root)

end procedure