Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-19 13:49:16 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix typo

Browse source
This commit is contained in:
Justin Ethier 2018-05-11 15:26:56 -04:00
parent ac82b0933b
commit f203e75b83
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
runtime.c
View file

@ -3089,7 +3089,7 @@ object FUNC_OP(void *data, common_type *x, object y) { \
} else if (tx == integer_tag && ty == complex_num_tag) { \ } else if (tx == integer_tag && ty == complex_num_tag) { \
x->complex_num_t.hdr.mark = gc_color_red; \ x->complex_num_t.hdr.mark = gc_color_red; \
x->complex_num_t.hdr.grayed = 0; \ x->complex_num_t.hdr.grayed = 0; \
x->complex_num_t.tag = double_tag; \ x->complex_num_t.tag = complex_num_tag; \
x->complex_num_t.value = x->integer_t.value OP ((complex_num_type *)y)->value; \ x->complex_num_t.value = x->integer_t.value OP ((complex_num_type *)y)->value; \
} else if (tx == bignum_tag && ty == complex_num_tag) { \ } else if (tx == bignum_tag && ty == complex_num_tag) { \
double d = mp_get_double(&(x->bignum_t.bn)); \ double d = mp_get_double(&(x->bignum_t.bn)); \
@ -3498,7 +3498,7 @@ object Cyc_div_op(void *data, common_type * x, object y)
} else if (tx == integer_tag && ty == complex_num_tag) { } else if (tx == integer_tag && ty == complex_num_tag) {
x->complex_num_t.hdr.mark = gc_color_red; x->complex_num_t.hdr.mark = gc_color_red;
x->complex_num_t.hdr.grayed = 0; x->complex_num_t.hdr.grayed = 0;
x->complex_num_t.tag = double_tag; x->complex_num_t.tag = complex_num_tag;
x->complex_num_t.value = x->integer_t.value / ((complex_num_type *)y)->value; x->complex_num_t.value = x->integer_t.value / ((complex_num_type *)y)->value;
} else if (tx == bignum_tag && ty == complex_num_tag) { } else if (tx == bignum_tag && ty == complex_num_tag) {
double d = mp_get_double(&(x->bignum_t.bn)); double d = mp_get_double(&(x->bignum_t.bn));