From 8ddfe3df29dfff3ac9f75972150bd263cc4e3487 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Mon, 10 Jan 2005 16:17:39 -0200
Subject: macros for all arithmetic operations over lua_Numbers

---
 lcode.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lcode.c')

diff --git a/lcode.c b/lcode.c
index d7ba78db..d2f05a8d 100644
--- a/lcode.c
+++ b/lcode.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lcode.c,v 2.7 2004/10/04 19:01:53 roberto Exp roberto $
+** $Id: lcode.c,v 2.8 2004/12/03 20:35:33 roberto Exp roberto $
 ** Code generator for Lua
 ** See Copyright Notice in lua.h
 */
@@ -606,7 +606,7 @@ void luaK_prefix (FuncState *fs, UnOpr op, expdesc *e) {
   if (op == OPR_MINUS) {
     luaK_exp2val(fs, e);
     if (e->k == VK && ttisnumber(&fs->f->k[e->info]))
-      e->info = luaK_numberK(fs, -nvalue(&fs->f->k[e->info]));
+      e->info = luaK_numberK(fs, num_unm(nvalue(&fs->f->k[e->info])));
     else {
       luaK_exp2anyreg(fs, e);
       freeexp(fs, e);
-- 
cgit v1.2.3-55-g6feb