Comma quibbling: Difference between revisions
Content deleted Content added
→{{header|dc}}: Add implementation. |
m →{{header|dc}}: Better register names and comments. |
||
Line 1,459:
=={{header|dc}}==
<syntaxhighlight lang="dc">[(q)uibble: main entry point
empty.]sx
[ [{]n z 0 !=
[
[ z 1 !=
[
after we return]sx
[ lfx lpx Lr ]
[(f)lip: utility routine
[ Sr z 0 !=f ]sf
[
[ Lr n 2 yr >c 2 yr =a 2 yr >p]sp
[(c)omma: utility routine
[ [, ]n ]sc
[(a)and: utility routine
[ [ and ]n ]sa
[run tests]sx
lqx
[ABC] lqx
[ABC] [DEF] lqx
[ABC] [DEF] [G] [H] lqx</syntaxhighlight>
{{out}}
|