Mercurial > repos > rhope
comparison runtime/integer.c @ 11:3021dac0d8f5
Stack unwind is so close I can almost taste it
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Tue, 19 May 2009 23:29:55 -0400 |
parents | 52d9948def24 |
children | 31f8182f3433 |
comparison
equal
deleted
inserted
replaced
10:0f2c4ee070fe | 11:3021dac0d8f5 |
---|---|
3 #include "context.h" | 3 #include "context.h" |
4 | 4 |
5 #define left ((_t_Int32 *)cdata->params[0]) | 5 #define left ((_t_Int32 *)cdata->params[0]) |
6 #define right ((_t_Int32 *)cdata->params[1]) | 6 #define right ((_t_Int32 *)cdata->params[1]) |
7 | 7 |
8 MethodNoLocals(_PL_,Int32,2) | 8 MethodNoLocals(_PL_,Int32, |
9 call = alloc_cdata(cdata->ct, 1); | 9 NumParams 2, |
10 CallSpace 1) | |
11 | |
10 CopiedParam(0, left, Int32, TYPE_INT32) | 12 CopiedParam(0, left, Int32, TYPE_INT32) |
11 Param(1, right, Int32, TYPE_INT32) | 13 Param(1, right, Int32, TYPE_INT32) |
12 | 14 |
13 left->num += right->num; | 15 left->num += right->num; |
14 | 16 |
15 release_ref((object *)right); | 17 release_ref((object *)right); |
16 EndFunc | 18 EndFunc |
17 | 19 |
18 MethodNoLocals(_MN_,Int32,2) | 20 MethodNoLocals(_MN_,Int32, |
19 call = alloc_cdata(cdata->ct, 1); | 21 NumParams 2, |
22 CallSpace 1) | |
23 | |
20 CopiedParam(0, left, Int32, TYPE_INT32) | 24 CopiedParam(0, left, Int32, TYPE_INT32) |
21 Param(1, right, Int32, TYPE_INT32) | 25 Param(1, right, Int32, TYPE_INT32) |
22 | 26 |
23 left->num -= right->num; | 27 left->num -= right->num; |
24 | 28 |