diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1998-01-12 11:00:51 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1998-01-12 11:00:51 -0200 |
| commit | 77a6836fef12a6383d1c9eb1587aa5afa30c9b5a (patch) | |
| tree | f8d4a72b306ec7ff3805ddc79bee7c8ab707b184 | |
| parent | 9f043e801733b0a5019c4e6e2a72abaf9ad7c5b0 (diff) | |
| download | lua-77a6836fef12a6383d1c9eb1587aa5afa30c9b5a.tar.gz lua-77a6836fef12a6383d1c9eb1587aa5afa30c9b5a.tar.bz2 lua-77a6836fef12a6383d1c9eb1587aa5afa30c9b5a.zip | |
we don't need a type "Word".
| -rw-r--r-- | lua.stx | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -1,6 +1,6 @@ | |||
| 1 | %{ | 1 | %{ |
| 2 | /* | 2 | /* |
| 3 | ** $Id: lua.stx,v 1.30 1997/12/29 17:35:46 roberto Exp roberto $ | 3 | ** $Id: lua.stx,v 1.31 1997/12/30 19:08:23 roberto Exp roberto $ |
| 4 | ** Syntax analizer and code generator | 4 | ** Syntax analizer and code generator |
| 5 | ** See Copyright Notice in lua.h | 5 | ** See Copyright Notice in lua.h |
| 6 | */ | 6 | */ |
| @@ -266,8 +266,8 @@ static int real_constant (real r) | |||
| 266 | 266 | ||
| 267 | static void code_number (real f) | 267 | static void code_number (real f) |
| 268 | { | 268 | { |
| 269 | Word i; | 269 | int i; |
| 270 | if (f >= 0 && f <= (real)MAX_WORD && (real)(i=(Word)f) == f) | 270 | if (f >= 0 && f <= (real)MAX_WORD && (real)(i=(int)f) == f) |
| 271 | code_oparg(PUSHNUMBER, 3, i, 1); /* f has an (short) integer value */ | 271 | code_oparg(PUSHNUMBER, 3, i, 1); /* f has an (short) integer value */ |
| 272 | else | 272 | else |
| 273 | code_constant(real_constant(f)); | 273 | code_constant(real_constant(f)); |