Fixed bug with static_branches

src/builtins.c

@@ -129,7 +129,6 @@
 {.name="parameters",          .calltype=call, .returns=true, .rettype=list},
 {.name="input",               .calltype=call, .returns=true, .rettype=string},
 {.name="open",                .calltype=call, .argc=2, .args={string, string}, .returns=true, .rettype=io},
-{.name="with",                .calltype=call, .argc=3, .args={string, string, block}, .stack=true},
 {.name="read-file",           .calltype=call, .argc=1, .args={io}, .returns=true, .rettype=string},
 {.name="close",               .calltype=call, .argc=1, .args={io}},
 {.name="path",                .calltype=call, .returns=true, .rettype=string},

src/cognac.c

@@ -2853,15 +2853,15 @@ void static_branches(module_t* m)
 							pop_register_front(regs);
 						clear_registers(regs); // Assume all functions are stack at this point.
 						if (f->returns)
-							push_register_front(make_register(f->rettype, a), regs);
+						push_register_front(make_register(f->rettype, a), regs);
 						break;
 					}
 				case bind:
 					{
 						reg_t* r = pop_register_front(regs);
 						if (r && r->source)
 						{
-							a->op->word->val->source = r->source;
+							//a->op->word->val->source = r->source;
 						}
 						break;
 					}
@@ -3155,18 +3155,18 @@ int main(int argc, char** argv)
 		flatten_ast,
 		merge_symbols,
 		assign_sequence_numbers,
-		//inline_functions,
-		//static_branches,
+		inline_functions,
+		static_branches,
 		static_calls,
 		determine_arguments,
 		compute_stack,
 		add_arguments,
 		add_generics,
-		//balance_branches,
+		balance_branches, // IDK if this is needed
 		compute_stack,
 		add_registers,
 		shorten_references,
-		//inline_values,
+		//inline_values, // I can't remember if this is broken or not
 		compute_variables,
 		resolve_early_use,
 		determine_unique_calls,