← Back to branch summary

~ubuntu-branches/ubuntu/intrepid/tcm/intrepid

« back to all changes in this revision

Viewing changes to src/sd/fv/cardconstraint.l

  • Committer: Bazaar Package Importer
  • Author(s): Otavio Salvador
  • Date: 2003-07-03 20:08:21 UTC
  • Revision ID: james.westby@ubuntu.com-20030703200821-se4xtqx25e5miczi
Tags: upstream-2.20
Import upstream version 2.20

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/sd/fv/cardconstraint.l
 
1
%{
 
2
#include "cardconstraint.tab.h"
 
3
#include "erparse.h"
 
4
char cardconstraint_errormsg[1024] = "";
 
5
char cardconstraint_constraint[1024] = "";
 
6
%}
 
7
 
 
8
number  0|[1-9][0-9]*
 
9
 
 
10
%%
 
11
","             {strcat(cardconstraint_constraint, ",");return(COMMA);}
 
12
"<="            {strcat(cardconstraint_constraint, "<=");return(LESSEQUAL);}
 
13
">="            {strcat(cardconstraint_constraint, ">=");return(GREATEREQUAL);}
 
14
"="             {strcat(cardconstraint_constraint, "=");return(EQUAL);}
 
15
"!="            {strcat(cardconstraint_constraint, "!=");return(NOTEQUAL);}
 
16
"<>"            {strcat(cardconstraint_constraint, "!=");return(NOTEQUAL);}
 
17
"<"             {strcat(cardconstraint_constraint, "<");return(LESS);}
 
18
">"             {strcat(cardconstraint_constraint, ">");return(GREATER);}
 
19
".."            {strcat(cardconstraint_constraint, "..");return(DOTDOT);}
 
20
"n"             {return(N);} 
 
21
"m"             {return(M);} 
 
22
{number}        {strcat(cardconstraint_constraint, cardconstrainttext);return(NUMBER);}
 
23
[ \t\r\n]+
 
24
.               {return(UNDEFINED);}
 
25
%%
 
26
 
 
27
int cardconstraintwrap() {
 
28
        return(1);
 
29
}
 
30
 
 
31
int cardconstrainterror(char *s) {
 
32
        strcpy(cardconstraint_errormsg, s);
 
33
        return 0;
 
34
}
 
35