Documentation/tutorial-script/0016-alice-dup.patch

   1 --- rpn/README.orig     2005-09-28 22:25:27.000000000 -0400
   2 +++ rpn/README  2005-09-28 22:26:56.000000000 -0400
   3 @@ -16,5 +16,6 @@
   4  .   Print the top element
   5  <   Swap the top two elements
   6  d   Drop the top element
   7 +D   Duplicate the top element
   8
   9  C   Clear the stack
  10 --- rpn/rpn.c.orig      2005-09-28 22:25:33.000000000 -0400
  11 +++ rpn/rpn.c   2005-09-28 22:26:27.000000000 -0400
  12 @@ -59,6 +59,10 @@
  13                 case 'd':
  14                         pop();
  15                         break;
  16 +               case 'D':
  17 +                       x = pop();
  18 +                       push(x); push(x);
  19 +                       break;
  20                 case 'C':
  21                         clear();
  22                         break;