Vladimir Sukharev
62 lines
1.4 KiB
Kotlin
Vendored
62 lines
1.4 KiB
Kotlin
Vendored
/*
|
|
* Copyright 2010-2021 JetBrains s.r.o. and Kotlin Programming Language contributors.
|
|
* Use of this source code is governed by the Apache 2.0 license that can be found in the license/LICENSE.txt file.
|
|
*/
|
|
// TARGET_BACKEND: NATIVE
|
|
// NATIVE_STANDALONE
|
|
// MODULE: cinterop
|
|
// FILE: threadStates.def
|
|
language = C
|
|
---
|
|
#include <stdint.h>
|
|
|
|
void assertNativeThreadState();
|
|
|
|
void runCallback(void(*callback)(void)) {
|
|
assertNativeThreadState();
|
|
callback();
|
|
assertNativeThreadState();
|
|
}
|
|
|
|
int32_t answer() {
|
|
assertNativeThreadState();
|
|
return 42;
|
|
}
|
|
|
|
// FILE: threadStates.cpp
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
|
|
// Implemented in the runtime for test purposes.
|
|
extern "C" bool Kotlin_Debugging_isThreadStateNative();
|
|
|
|
extern "C" void assertNativeThreadState() {
|
|
if (!Kotlin_Debugging_isThreadStateNative()) {
|
|
printf("Incorrect thread state. Expected native thread state.");
|
|
abort();
|
|
}
|
|
}
|
|
|
|
// MODULE: main(cinterop)
|
|
// FILE: main.kt
|
|
@file:OptIn(kotlin.native.runtime.NativeRuntimeApi::class, kotlinx.cinterop.ExperimentalForeignApi::class)
|
|
|
|
import kotlin.native.runtime.Debugging
|
|
import kotlin.test.*
|
|
import kotlinx.cinterop.*
|
|
import threadStates.*
|
|
|
|
fun box(): String {
|
|
runCallback(staticCFunction { ->
|
|
assertRunnableThreadState()
|
|
answer()
|
|
Unit
|
|
})
|
|
assertRunnableThreadState()
|
|
return "OK"
|
|
}
|
|
|
|
fun assertRunnableThreadState() {
|
|
assertTrue(Debugging.isThreadStateRunnable)
|
|
}
|