#![allow(unused_imports)]
#![allow(dead_code)]
use std::rc::Rc;
use mrubyedge::yamrb::value::RObject;
pub use mrubyedge::yamrb::helpers::mrb_funcall;
macro_rules! mrbc_compile_ {
($fname:expr, $code:expr) => {{
use std::{ffi::CStr, fs::File, io::Write};
let mut src = std::env::temp_dir();
src.push(format!("{}.{}.mrb", $fname, std::process::id()));
let mut f = File::create(&src).expect("cannot open srs file");
f.write_all($code.as_bytes())
.expect("cannot create src file");
f.flush().unwrap();
let mut src0 = src.as_os_str().to_string_lossy().into_owned();
src0.push('\0');
let mut dest = std::env::temp_dir();
dest.push(format!("{}.{}.mrb", $fname, std::process::id()));
let mut dest0 = dest.as_os_str().to_string_lossy().into_owned();
dest0.push('\0');
let args = [
CStr::from_bytes_with_nul(b"mrbc\0").unwrap().as_ptr(),
CStr::from_bytes_with_nul(b"-o\0").unwrap().as_ptr(),
CStr::from_bytes_with_nul(dest0.as_bytes())
.unwrap()
.as_ptr(),
CStr::from_bytes_with_nul(src0.as_bytes()).unwrap().as_ptr(),
];
unsafe {
mec_mrbc_sys::mrbc_main(args.len() as i32, args.as_ptr() as *mut *mut i8);
}
dest
}};
}
pub(crate) fn mrbc_compile(fname: &'static str, code: &'static str) -> Vec<u8> {
let dest = mrbc_compile_!(fname, code);
std::fs::read(dest).unwrap()
}
macro_rules! mrbc_compile_debug_ {
($fname:expr, $code:expr) => {{
use std::{ffi::CStr, fs::File, io::Write};
let mut src = std::env::temp_dir();
src.push(format!("{}.{}.mrb", $fname, std::process::id()));
let mut f = File::create(&src).expect("cannot open srs file");
f.write_all($code.as_bytes())
.expect("cannot create src file");
f.flush().unwrap();
let mut src0 = src.as_os_str().to_string_lossy().into_owned();
src0.push('\0');
let mut dest = std::env::temp_dir();
dest.push(format!("{}.{}.mrb", $fname, std::process::id()));
let mut dest0 = dest.as_os_str().to_string_lossy().into_owned();
dest0.push('\0');
let args = [
CStr::from_bytes_with_nul(b"mrbc\0").unwrap().as_ptr(),
CStr::from_bytes_with_nul(b"-v\0").unwrap().as_ptr(),
CStr::from_bytes_with_nul(b"-o\0").unwrap().as_ptr(),
CStr::from_bytes_with_nul(dest0.as_bytes())
.unwrap()
.as_ptr(),
CStr::from_bytes_with_nul(src0.as_bytes()).unwrap().as_ptr(),
];
unsafe {
mec_mrbc_sys::mrbc_main(args.len() as i32, args.as_ptr() as *mut *mut i8);
}
dest
}};
}
pub(crate) fn mrbc_compile_debug(fname: &'static str, code: &'static str) -> Vec<u8> {
let dest = mrbc_compile_debug_!(fname, code);
std::fs::read(dest).unwrap()
}
pub(crate) fn int(n: i64) -> Rc<RObject> {
Rc::new(RObject::integer(n))
}
pub(crate) fn string(s: &str) -> Rc<RObject> {
Rc::new(RObject::string(s.to_string()))
}