History variables: Difference between revisions

(Implemented and tested history variables in Haskell.)
Line 227:
: (restoreH 'A)
-> NIL</pre>
 
=={{header|PL/I}}==
<lang PL/I>
declare t float controlled;
 
do i = 1 to 5; /* a loop to read in and save five values. */
allocate t; get (t);
end;
 
do while (allocation(t) > 0); /* a loop to retrieve the values. */
put (t); free t;
end;
</lang>
 
=={{header|Protium}}==
Anonymous user