C++ (Cpp) idris_gcの例

コード例 #1

ファイル: idris_rts.c プロジェクト: Speshial/Idris-dev

void idris_requireAlloc(VM* vm, size_t size) {
    if (!(vm->heap.next + size < vm->heap.end)) {
        idris_gc(vm);
    }

    int lock = vm->processes > 0;
    if (lock) { // not message passing
       pthread_mutex_lock(&vm->alloc_lock); 
    }
}

コード例 #2

ファイル: idris_rts.c プロジェクト: DanielWaterworth/Idris-dev

void idris_requireAlloc(VM* vm, size_t size) {
    if (!(vm->heap.next + size < vm->heap.end)) {
        idris_gc(vm);
    }

    int lock = vm->processes > 0;
    if (lock) { // We only need to lock if we're in concurrent mode
       pthread_mutex_lock(&vm->alloc_lock); 
    }
}

コード例 #3

ファイル: idris_rts.c プロジェクト: mheinzel/Idris-dev

void idris_requireAlloc(size_t size) {
#ifdef HAS_PTHREAD
    VM* vm = pthread_getspecific(vm_key);
#else
    VM* vm = global_vm;
#endif

    if (!(vm->heap.next + size < vm->heap.end)) {
        idris_gc(vm);
    }
#ifdef HAS_PTHREAD
    int lock = vm->processes > 0;
    if (lock) { // We only need to lock if we're in concurrent mode
       pthread_mutex_lock(&vm->alloc_lock);
    }
#endif
}

コード例 #4

ファイル: idris_stdfgn.c プロジェクト: zzmjohn/Idris-dev

void idris_forceGC(void* vm) {
    idris_gc((VM*)vm);
}