Diff for /loncom/homework/CAPA-converter/capaCommon.c between versions 1.4 and 1.8

version 1.4, 2000/07/06 21:06:22 version 1.8, 2001/11/15 21:42:42
Line 153  extern  void       (*Status_Func)(); Line 153  extern  void       (*Status_Func)();
   begin_text();    begin_text();
   /*if ( !yyparse() )  { errcode = Lexi_qnum; } else { errcode = 0; }*/    /*if ( !yyparse() )  { errcode = Lexi_qnum; } else { errcode = 0; }*/
   if (!(temp=yylex())) { errcode = Lexi_qnum; } else { errcode = 0; }    if (!(temp=yylex())) { errcode = Lexi_qnum; } else { errcode = 0; }
   printf("\nExited on: %d\n",temp);  /*  printf("\nExited on: %d\n",temp); */
   printf("Flushing:\n");  /*  printf("Flushing:\n"); */
   flush_delayed();    flush_delayed();
   /* fclose(Input_stream[0]);*/ /*The Lexer handles closing this*/    /* fclose(Input_stream[0]);*/ /*The Lexer handles closing this*/
   /* print_symb_stat(); */    /* print_symb_stat(); */
Line 263  void end_mode() Line 263  void end_mode()
   case MODE_COMMENT: send("</comment>\n"); break;    case MODE_COMMENT: send("</comment>\n"); break;
   case MODE_BLOCK: send("</block>\n"); break;    case MODE_BLOCK: send("</block>\n"); break;
   case MODE_SCRIPT: send("</script>\n"); break;    case MODE_SCRIPT: send("</script>\n"); break;
   case MODE_OUTTEXT: send("</outtext>\n"); break;    case MODE_OUTTEXT: send("<endouttext />\n"); break;
   case MODE_ANSWER: send("</answergroup>\n"); break;    case MODE_ANSWER: send("\n"); break;
     case MODE_HINT: send("<endouttext />\n</hintpart>\n</hintgroup>\n"); break;
   case MODE_NONE: break;    case MODE_NONE: break;
   }    }
   mode=MODE_NONE;    mode=MODE_NONE;
Line 277  void start_mode(int newmode,char* args) Line 278  void start_mode(int newmode,char* args)
   switch (newmode) {    switch (newmode) {
   case MODE_COMMENT: send("<comment>\n"); break;    case MODE_COMMENT: send("<comment>\n"); break;
   case MODE_BLOCK: send("<block %s>\n",args); break;    case MODE_BLOCK: send("<block %s>\n",args); break;
   case MODE_SCRIPT: send("<script>\n"); break;    case MODE_SCRIPT: send("<script type=\"loncapa/perl\">\n"); break;
   case MODE_OUTTEXT: send("<outtext>\n"); break;    case MODE_OUTTEXT: send("<startouttext />\n"); break;
   case MODE_ANSWER: send("<answergroup>\n"); break;    case MODE_ANSWER: send("\n"); break;
     case MODE_HINT: send("<hintgroup>\n<hintpart on=\"default\">\n<startouttext />\n"); break;
   case MODE_NONE: break;    case MODE_NONE: break;
   }    }
   mode=newmode;    mode=newmode;

Removed from v.1.4  
changed lines
  Added in v.1.8


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>