[BACK]Return to capaLexerDef.flex CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / homework / CAPA-converter

Diff for /loncom/homework/CAPA-converter/capaLexerDef.flex between versions 1.10 and 1.14

version 1.10, 2001/11/18 09:49:43 version 1.14, 2001/12/04 15:17:57
Line 1 Line 1
   /* The LearningOnline Network with CAPA
    * CAPA lexer dfinition, heavily modified to become a LON-CAPA convertor 
    * $Id$
    *
    * Copyright Michigan State University Board of Trustees
    *
    * This file is part of the LearningOnline Network with CAPA (LON-CAPA).
    *
    * LON-CAPA is free software; you can redistribute it and/or modify
    * it under the terms of the GNU General Public License as published by
    * the Free Software Foundation; either version 2 of the License, or
    * (at your option) any later version.
    *
    * LON-CAPA is distributed in the hope that it will be useful,
    * but WITHOUT ANY WARRANTY; without even the implied warranty of
    * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    * GNU General Public License for more details.
    *
    * You should have received a copy of the GNU General Public License
    * along with LON-CAPA; if not, write to the Free Software
    * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
    *
    * /home/httpd/html/adm/gpl.txt
    *
    * http://www.lon-capa.org/
    */
   
 /*------------------------------------------------------------------------*/  /*------------------------------------------------------------------------*/
 /*         capaLexerDef.flex   created by Isaac Tsai Jul 15 1996          */  /*         capaLexerDef.flex   created by Isaac Tsai Jul 15 1996          */
 /*                             added /END(variable)                       */  /*                             added /END(variable)                       */
Line 688  EndLine    ([\r][\n]|[\n]) Line 715  EndLine    ([\r][\n]|[\n])
 }  }
   
 <S_IMPORT>{  <S_IMPORT>{
 {FileName}{Space}*             {  {FileName}{Space}*             { char *endquote;
                                  end_mode();                                   end_mode();
  start_mode(MODE_IMPORT,NULL);   start_mode(MODE_IMPORT,NULL);
                                  send("%s/%s",import_prefix,yytext);   /* Get rid of leading and trailing quotes */
          end_mode();   endquote = strrchr(yytext,'\"');
                                  BEGIN S_SKIP;                                    *endquote = '\0';
                                    if (yytext[1] == '/') {
                                       send("%s%s",import_prefix,&yytext[1]);
                                    } else {
                                       send("%s",&yytext[1]);
                                    }
    end_mode();
    BEGIN S_SKIP;
                                }                                 }
 {Identifier}{Space}*           { end_mode();  {Identifier}{Space}*           { end_mode();
  start_mode(MODE_IMPORT,NULL);   start_mode(MODE_IMPORT,NULL);
  send("$%s",yytext);   send("$%s",yytext);
  end_mode();   end_mode();
  BEGIN S_SKIP;                                   BEGIN S_SKIP;
        }         }
 }  }
   
Line 930  EndLine    ([\r][\n]|[\n]) Line 964  EndLine    ([\r][\n]|[\n])
  BEGIN S_ECHO;   BEGIN S_ECHO;
                       }                        }
                     }                      }
   [%]                 {send("%%");}
 {Operator}          { LLDBUG_PR2("[Op(%c) in VAR,TF_STMT,LET]",yytext[0]); send(yytext); }  {Operator}          { LLDBUG_PR2("[Op(%c) in VAR,TF_STMT,LET]",yytext[0]); send(yytext); }
 }  }
   
Line 988  EndLine    ([\r][\n]|[\n]) Line 1023  EndLine    ([\r][\n]|[\n])
                       send("'");                        send("'");
       yy_pop_state();        yy_pop_state();
     }      }
   [%]                 { /*Escape percent signs so that vasprintf doesn't choke */
                         send("%%");
                       }
 {EndLine}           { /* check for termination of string constant */  {EndLine}           { /* check for termination of string constant */
                       char warn_msg[WARN_MSG_LENGTH];                        char warn_msg[WARN_MSG_LENGTH];
                                               
Removed from v.1.10  
changed lines
  Added in v.1.14

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