// This produces a steady stream of the same character.
#include <stdlib.h>
#include "pushy.h"
typedef struct {unode un; char a;} repeater;
static void rptr(unode* n){
  (n->dn->code)(((repeater*)n)->a, n->dn, n);}
unode* crptr(dnode* n, char a){
  repeater* r = (repeater*)malloc(sizeof(repeater));
  *r = (repeater){(unode){rptr, n}, a};
  return &r->un;}