runCatching that does not catch Fatal throwables and does not catch CancellationException

runCatchingNonFatal.kt

inline fun <R> runCatchingNonFatal(block: () -> R): Result<R> {
  return try {
    Result.success(block())
  }
  catch (t: Throwable) {
    when (t) {
      // VirtualMachineError includes OutOfMemoryError and other fatal errors
      is VirtualMachineError, is ThreadDeath, is InterruptedException, is LinkageError, is CancellationException -> throw t
      else -> Result.failure(t)
    }
  }
}

/*
See
- https://github.com/Kotlin/kotlinx.coroutines/issues/1814
- https://github.com/scala/scala/blob/2.13.x/src/library/scala/util/control/NonFatal.scala
*/