quipu mercurial repository
修订版 | 28ec2c7c97933371a434193604fcc594a7d23542 (tree) |
---|---|
时间 | 2019-10-11 06:06:39 |
作者 | Agustina Arzille <avarzille@rise...> |
Commiter | Agustina Arzille |
Reorder operations
@@ -55,6 +55,12 @@ | ||
55 | 55 | return (ret); |
56 | 56 | } |
57 | 57 | |
58 | +static inline atomic_t* | |
59 | +root_plen (object obj) | |
60 | +{ | |
61 | + return ((atomic_t *)&xaref(obj, -1)); | |
62 | +} | |
63 | + | |
58 | 64 | static object |
59 | 65 | make_root_node (interpreter *interp) |
60 | 66 | { |
@@ -64,12 +70,6 @@ | ||
64 | 70 | return (ret); |
65 | 71 | } |
66 | 72 | |
67 | -static inline atomic_t* | |
68 | -root_plen (object obj) | |
69 | -{ | |
70 | - return ((atomic_t *)&xaref(obj, -1)); | |
71 | -} | |
72 | - | |
73 | 73 | object alloc_tuple (interpreter *interp, object tst) |
74 | 74 | { |
75 | 75 | evh_guard eg (interp); |