Comma quibbling: Difference between revisions
Content added Content deleted
m (→{{header|dc}}: Better register names and comments.) |
m (→{{header|dc}}) |
||
| Line 1,475: | Line 1,475: | ||
[(p)rint: get next item from stack in r register and print it. If there are |
[(p)rint: get next item from stack in r register and print it. If there are |
||
more than 2 items left |
more than 2 items left on the register stack (which never drops below one |
||
item), print a comma (c) and recurse. If there are exactly two items left, |
|||
print " and " (a) and return.]sx |
|||
[ Lr n 2 yr >c 2 yr =a 2 yr >p]sp |
[ Lr n 2 yr >c 2 yr =a 2 yr >p]sp |
||