Rosetta Code

Accumulator factory: Difference between revisions

Page Discussion

Accumulator factory (view source)

Revision as of 17:48, 6 February 2020

241 bytes removed ,  4 years ago
m
→‎{{header|Retro}}
(add Mercury)
Line 2,719:
=={{header|Retro}}==
Retro only supports integers.
<lang Retro> : acc here swap , [ &+! &@ bi ] curry ;
 
( create an accumulator function )
1 acc
 
( and give it a name )
constant x
 
( add values to it and display the results )
5 x do putn
2 x do putn</lang>
 
 
RETRO 12, 2018.4
 
<lang Retro>:acc (ns-)
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/135746"