// S : tags   error todo c  $TAGS
// S : expect --result error --location-comment ERROR
// S : cc     -o test.bc  $CC_OPT $file
// S : verify  $V_OPT test.bc

#include <assert.h>
#include <sys/divm.h>
#include <dios.h>

void fun()
{
    struct _VM_Frame *frame = __vm_ctl_get( _VM_CR_Frame );
    __vm_obj_free( frame->parent );
    assert( 0 );
}

int main()
{
    fun(); /* ERROR */
    assert( 0 );
}