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

Use inline fnc directly

Browse source
This commit is contained in:
Justin Ethier 2018-12-17 18:29:43 -05:00
parent d913b951dc
commit 0a4f027f89
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
seq-test.scm
View file

@ -54,9 +54,11 @@
result = S_732_7313;
break;
} else {
complex_num_type local_7350;
if( (boolean_f != ((inline_function_type)
((closure)__glo_symbol_121_127_191_191inline_191_191)->fn)(data,&local_7350, sym_731_7312, Cyc_car(data, S_732_7313))) ){
if (strcmp(symbol_desc(sym_731_7312),
symbol_desc(Cyc_car(data, S_732_7313))) < 0) {
//complex_num_type local_7350;
//if( (boolean_f != ((inline_function_type)
// ((closure)__glo_symbol_121_127_191_191inline_191_191)->fn)(data,&local_7350, sym_731_7312, Cyc_car(data, S_732_7313))) ){
//pair_type local_7356;
//return_closcall1(data, k_7318, set_pair_as_expr(&local_7356, sym_731_7312, S_732_7313));
pair_type* local_7356 = alloca(sizeof(pair_type));