Skip to content
Snippets Groups Projects
Commit d0a7acc8 authored by Henrik (Grubba) Grubbström's avatar Henrik (Grubba) Grubbström
Browse files

Minor change.

Rev: src/language.yacc:1.73
Rev: src/lex.c:1.51
parent 05158afe
No related branches found
No related tags found
No related merge requests found
...@@ -171,7 +171,7 @@ ...@@ -171,7 +171,7 @@
/* This is the grammar definition of Pike. */ /* This is the grammar definition of Pike. */
#include "global.h" #include "global.h"
RCSID("$Id: language.yacc,v 1.72 1998/04/10 22:24:20 hubbe Exp $"); RCSID("$Id: language.yacc,v 1.73 1998/04/10 23:23:08 grubba Exp $");
#ifdef HAVE_MEMORY_H #ifdef HAVE_MEMORY_H
#include <memory.h> #include <memory.h>
#endif #endif
...@@ -1298,7 +1298,7 @@ expr3: expr4 ...@@ -1298,7 +1298,7 @@ expr3: expr4
expr4: string expr4: string
| F_NUMBER { $$=mkintnode($1); } | F_NUMBER { $$=mkintnode($1); }
| F_FLOAT { $$=mkfloatnode($1); } | F_FLOAT { $$=mkfloatnode((FLOAT_TYPE)$1); }
| catch | catch
| gauge | gauge
| typeof | typeof
......
...@@ -4,7 +4,7 @@ ...@@ -4,7 +4,7 @@
||| See the files COPYING and DISCLAIMER for more information. ||| See the files COPYING and DISCLAIMER for more information.
\*/ \*/
#include "global.h" #include "global.h"
RCSID("$Id: lex.c,v 1.50 1998/04/10 22:24:20 hubbe Exp $"); RCSID("$Id: lex.c,v 1.51 1998/04/10 23:29:21 grubba Exp $");
#include "language.h" #include "language.h"
#include "array.h" #include "array.h"
#include "lex.h" #include "lex.h"
...@@ -605,7 +605,7 @@ static int yylex2(YYSTYPE *yylval) ...@@ -605,7 +605,7 @@ static int yylex2(YYSTYPE *yylval)
if(p1>p2) if(p1>p2)
{ {
lex.pos=p1; lex.pos=p1;
yylval->fnum=(float)f; yylval->fnum=(FLOAT_TYPE)f;
return F_FLOAT; return F_FLOAT;
}else{ }else{
lex.pos=p2; lex.pos=p2;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment