diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2010-04-14 12:13:48 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2010-04-14 12:13:48 -0300 |
commit | 7dfa4cd655118faf164427356609fec31906dac2 (patch) | |
tree | d39fac9afba1dc0ab01dd5d174824120650c9eab /lobject.c | |
parent | fc6203ee4308173283f9ad9de6694d47f0908c4d (diff) | |
download | lua-7dfa4cd655118faf164427356609fec31906dac2.tar.gz lua-7dfa4cd655118faf164427356609fec31906dac2.tar.bz2 lua-7dfa4cd655118faf164427356609fec31906dac2.zip |
first implementation of light C functions
Diffstat (limited to 'lobject.c')
-rw-r--r-- | lobject.c | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lobject.c,v 2.36 2010/04/02 15:30:27 roberto Exp roberto $ | 2 | ** $Id: lobject.c,v 2.37 2010/04/05 16:26:37 roberto Exp roberto $ |
3 | ** Some generic functions over Lua objects | 3 | ** Some generic functions over Lua objects |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -83,6 +83,8 @@ int luaO_rawequalObj (const TValue *t1, const TValue *t2) { | |||
83 | return pvalue(t1) == pvalue(t2); | 83 | return pvalue(t1) == pvalue(t2); |
84 | case LUA_TSTRING: | 84 | case LUA_TSTRING: |
85 | return rawtsvalue(t1) == rawtsvalue(t2); | 85 | return rawtsvalue(t1) == rawtsvalue(t2); |
86 | case LUA_TCFP: | ||
87 | return fvalue(t1) == fvalue(t2); | ||
86 | default: | 88 | default: |
87 | lua_assert(iscollectable(t1)); | 89 | lua_assert(iscollectable(t1)); |
88 | return gcvalue(t1) == gcvalue(t2); | 90 | return gcvalue(t1) == gcvalue(t2); |