Mercurial > repos > rhope

comparison runtime/integer.c @ 18:ea991f95ae1f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
C backend working well enough to generate Fib test
author Mike Pavone <pavone@retrodev.com>
date Wed, 27 May 2009 04:49:32 -0400
parents 31f8182f3433
children 640f541e9116
comparison
equal deleted inserted replaced
17:d05184970c1c 18:ea991f95ae1f
43 Ret(0, Yes) 43 Ret(0, Yes)
44 } else { 44 } else {
45 release_ref(cdata->params[0]); 45 release_ref(cdata->params[0]);
46 Ret(0, No) 46 Ret(0, No)
47 } 47 }
48 release_ref(cdata->params[0]); 48 release_ref(cdata->params[1]);
49 EndFunc 49 EndFunc
50 50
51 MethodNoLocals(_GT_,Int32, 51 MethodNoLocals(_GT_,Int32,
52 NumParams 2, 52 NumParams 2,
53 CallSpace 1) 53 CallSpace 1)
61 Ret(0, Yes) 61 Ret(0, Yes)
62 } else { 62 } else {
63 release_ref(cdata->params[0]); 63 release_ref(cdata->params[0]);
64 Ret(0, No) 64 Ret(0, No)
65 } 65 }
66 release_ref(cdata->params[0]); 66 release_ref(cdata->params[1]);
67 EndFunc 67 EndFunc
68 68
69 object * make_Int32(int32_t val) 69 object * make_Int32(int32_t val)
70 { 70 {
71 t_Int32 * obj; 71 t_Int32 * obj;