/* assemble */
    while (readline() != -1) {
      assemble();
      if (loccnt > 0x2000) {
        if (proc_ptr == NULL)
          fatal_error("Bank overflow, offset > $1FFF!");
        else {
          char tmp[128];

          sprintf(tmp, "Proc : '%s' is too large (code > 8KB)!", proc_ptr->name);
          fatal_error(tmp);
        }
        break;
      }
      if (stop_pass)
        break;
    }