Rosetta Code

Rosetta Code/Rank languages by popularity: Difference between revisions

Page Discussion

Rosetta Code/Rank languages by popularity (view source)

Revision as of 20:08, 29 March 2019

180 bytes removed ,  5 years ago
m
→‎REXX program: simplified and optimized the COMMAS function.
m (→‎{{header|REXX}}: updated the number of computer programming languages that are on Rosetta Code.)
m (→‎REXX program: simplified and optimized the COMMAS function.)
Line 4,490:
exit /*stick a fork in it, we're all done. */
/*──────────────────────────────────────────────────────────────────────────────────────*/
commas: procedure; parse arg _; n do j=length(_'.9';)-3 #=123456789; #0=#"0"to 1 by -3; #0.=#0'.';b_=verifyinsert(n,#","M",_,j); end; return _
e= verify(n, #0, , verify(n, #0., 'M')) - 4 /* [↓] insert commas into a number*/
do j=e to b by -3; _= insert(",", _, j); end /*j*/; return _
/*──────────────────────────────────────────────────────────────────────────────────────*/
eSort: procedure expose #. @. !tr.; arg N,p2; h= N /*sort: number of members*/
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/96897"