language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-26 21:39:07 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Add tests for user crash

Browse source
This commit is contained in:
Ayaz Hafiz 2022-11-22 16:28:39 -06:00
parent c8accc90e8
commit 9201cf0b32
No known key found for this signature in database
GPG key ID: 0E2A37416A25EF58
3 changed files with 77 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

12
crates/compiler/test_gen/src/helpers/platform_functions.rs
View file

@ -1,5 +1,7 @@
use core::ffi::c_void;
use roc_std::RocStr;
/// # Safety
/// The Roc application needs this.
#[no_mangle]
@ -36,7 +38,7 @@ pub unsafe fn roc_dealloc(c_ptr: *mut c_void, _alignment: u32) {
/// # Safety
/// The Roc application needs this.
#[no_mangle]
pub unsafe fn roc_panic(c_ptr: *mut c_void, tag_id: u32) {
pub unsafe fn roc_panic(msg: &RocStr, tag_id: u32) {
use roc_gen_llvm::llvm::build::PanicTagId;
use std::ffi::CStr;
@ -44,9 +46,11 @@ pub unsafe fn roc_panic(c_ptr: *mut c_void, tag_id: u32) {
match PanicTagId::try_from(tag_id) {
Ok(PanicTagId::RocPanic) => {
let slice = CStr::from_ptr(c_ptr as *const c_char);
let string = slice.to_str().unwrap();
eprintln!("Roc hit a panic: {}", string);
eprintln!("Roc hit a panic: {}", msg);
std::process::exit(1);
}
Ok(PanicTagId::UserPanic) => {
eprintln!("User panic: {}", msg);
std::process::exit(1);
}
Err(_) => unreachable!(),