| 38 | }; |
| 39 | |
| 40 | InlineCtx compile_inline(const char * src) { |
| 41 | InlineCtx ic; |
| 42 | ic.tout = das_text_make_printer(); |
| 43 | ic.module_group = das_modulegroup_make(); |
| 44 | ic.file_access = das_fileaccess_make_default(); |
| 45 | das_fileaccess_introduce_file(ic.file_access, "main.das", src, 1); |
| 46 | ic.program = das_program_compile((char*)"main.das", ic.file_access, ic.tout, ic.module_group); |
| 47 | if ( das_program_err_count(ic.program) ) return ic; |
| 48 | ic.ctx = das_context_make(das_program_context_stack_size(ic.program)); |
| 49 | if ( !das_program_simulate(ic.program, ic.ctx, ic.tout) ) { |
| 50 | das_context_release(ic.ctx); |
| 51 | ic.ctx = nullptr; |
| 52 | } |
| 53 | return ic; |
| 54 | } |
| 55 | |
| 56 | void cleanup_inline_ctx(InlineCtx & ic) { |
| 57 | if ( ic.ctx ) das_context_release(ic.ctx); |
no test coverage detected