Skip to content

Commit cf9144d

Browse files
committed
fix spelling of base_core, though it does not seem to make a difference
1 parent 98cf1db commit cf9144d

File tree

1 file changed

+10
-10
lines changed

1 file changed

+10
-10
lines changed

src/ops/nqp_bigint.ops

Lines changed: 10 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -90,7 +90,7 @@ inline op nqp_bigint_abs(out PMC, in PMC) :base_core {
9090
mp_abs(a, get_bigint(interp, $1));
9191
}
9292

93-
inline op nqp_bigint_cmp(out INT, in PMC, in PMC) :base_cor {
93+
inline op nqp_bigint_cmp(out INT, in PMC, in PMC) :base_core {
9494
mp_int *a = get_bigint(interp, $2);
9595
mp_int *b = get_bigint(interp, $3);
9696
$1 = mp_cmp(a, b);
@@ -100,13 +100,13 @@ inline op nqp_bigint_bool(out INT, in PMC) :base_core {
100100
$1 = !mp_iszero(get_bigint(interp, $2));
101101
}
102102

103-
inline op nqp_bigint_eq(out INT, in PMC, in PMC) :base_cor {
103+
inline op nqp_bigint_eq(out INT, in PMC, in PMC) :base_core {
104104
mp_int *a = get_bigint(interp, $2);
105105
mp_int *b = get_bigint(interp, $3);
106106
$1 = MP_EQ == mp_cmp(a, b);
107107
}
108108

109-
inline op nqp_bigint_ne(out INT, in PMC, in PMC) :base_cor {
109+
inline op nqp_bigint_ne(out INT, in PMC, in PMC) :base_core {
110110
mp_int *a = get_bigint(interp, $2);
111111
mp_int *b = get_bigint(interp, $3);
112112
$1 = MP_EQ != mp_cmp(a, b);
@@ -118,19 +118,19 @@ inline op nqp_bigint_gt(out INT, in PMC, in PMC) :base_cor {
118118
$1 = MP_GT == mp_cmp(a, b);
119119
}
120120

121-
inline op nqp_bigint_ge(out INT, in PMC, in PMC) :base_cor {
121+
inline op nqp_bigint_ge(out INT, in PMC, in PMC) :base_core {
122122
mp_int *a = get_bigint(interp, $2);
123123
mp_int *b = get_bigint(interp, $3);
124124
$1 = MP_LT != mp_cmp(a, b);
125125
}
126126

127-
inline op nqp_bigint_lt(out INT, in PMC, in PMC) :base_cor {
127+
inline op nqp_bigint_lt(out INT, in PMC, in PMC) :base_core {
128128
mp_int *a = get_bigint(interp, $2);
129129
mp_int *b = get_bigint(interp, $3);
130130
$1 = MP_LT == mp_cmp(a, b);
131131
}
132132

133-
inline op nqp_bigint_le(out INT, in PMC, in PMC) :base_cor {
133+
inline op nqp_bigint_le(out INT, in PMC, in PMC) :base_core {
134134
mp_int *a = get_bigint(interp, $2);
135135
mp_int *b = get_bigint(interp, $3);
136136
$1 = MP_GT != mp_cmp(a, b);
@@ -187,28 +187,28 @@ inline op nqp_bigint_shl(out PMC, in PMC, in INT) :base_core {
187187
mp_mul_2d(a, $3, b);
188188
}
189189

190-
inline op nqp_bigint_band(out PMC, in PMC, in PMC) :base_cor {
190+
inline op nqp_bigint_band(out PMC, in PMC, in PMC) :base_core {
191191
mp_int *a = get_bigint(interp, $2);
192192
mp_int *b = get_bigint(interp, $3);
193193
$1 = REPR($2)->allocate(interp, STABLE($2));
194194
REPR($1)->initialize(interp, STABLE($1), OBJECT_BODY($1));
195195
mp_and(a, b, get_bigint(interp, $1));
196196
}
197-
inline op nqp_bigint_bor(out PMC, in PMC, in PMC) :base_cor {
197+
inline op nqp_bigint_bor(out PMC, in PMC, in PMC) :base_core {
198198
mp_int *a = get_bigint(interp, $2);
199199
mp_int *b = get_bigint(interp, $3);
200200
$1 = REPR($2)->allocate(interp, STABLE($2));
201201
REPR($1)->initialize(interp, STABLE($1), OBJECT_BODY($1));
202202
mp_or(a, b, get_bigint(interp, $1));
203203
}
204-
inline op nqp_bigint_bxor(out PMC, in PMC, in PMC) :base_cor {
204+
inline op nqp_bigint_bxor(out PMC, in PMC, in PMC) :base_core {
205205
mp_int *a = get_bigint(interp, $2);
206206
mp_int *b = get_bigint(interp, $3);
207207
$1 = REPR($2)->allocate(interp, STABLE($2));
208208
REPR($1)->initialize(interp, STABLE($1), OBJECT_BODY($1));
209209
mp_xor(a, b, get_bigint(interp, $1));
210210
}
211-
inline op nqp_bigint_bnot(out PMC, in PMC) :base_cor {
211+
inline op nqp_bigint_bnot(out PMC, in PMC) :base_core {
212212
mp_int *a = get_bigint(interp, $2);
213213
mp_int *b;
214214
$1 = REPR($2)->allocate(interp, STABLE($2));

0 commit comments

Comments
 (0)