/*
 * $Header: /home/gene/library/website/docsrc/icfp2001/totoro-i/source/RCS/lexer.c,v 395.1 2008/04/20 17:25:51 gene Exp $
 */

#include <assert.h>
#include <stdio.h>
#include <string.h>

int
main ()
{
  int rc = 0;
  int c;

  printf ("(");
  while (rc == 0 && (c = fgetc (stdin)) != EOF)
  {
    if (c == '<')
    {
      printf ("\"");
      do
      {
        printf ("%c", c);
      }
      while (rc == 0 && (c = fgetc (stdin)) != EOF && c != '>');
      printf ("%c\"\n", c);
    }
    else
    {
      printf ("#\\%c\n", c);
    }
  }
  printf (")\n");
  return rc;
}

/* --- end of file --- */