Warning: this is an htmlized version!
The original is here, and the conversion rules are here. |
% strlen C1: nasm( 4, "extern strlen\n\tdd strlen\n"); :RSR 0<."> : S0<."> S> DUP strlen 2DUP TYPE + 1 + >S ; g: DEMO 0<."> dbstuff( "Hello\n", 0); 0<."> dbstuff( "There!\n", 0); ;