aboutsummaryrefslogtreecommitdiff
path: root/src/lib.rs
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib.rs')
-rw-r--r--src/lib.rs10
1 files changed, 9 insertions, 1 deletions
diff --git a/src/lib.rs b/src/lib.rs
index e3c7e47..d403fbc 100644
--- a/src/lib.rs
+++ b/src/lib.rs
@@ -7,12 +7,20 @@ include!(concat!(env!("OUT_DIR"), "/bindings.rs"));
#[cfg(test)]
mod tests {
use super::*;
- use std::ffi::CString;
+ use std::ffi::{CStr, CString};
#[test]
fn two_plus_two() {
unsafe {
let interp = Tcl_CreateInterp();
+ let init_status = Tcl_Init(interp);
+ if init_status == TCL_ERROR as i32 {
+ eprintln!(
+ "{}",
+ CStr::from_ptr(Tcl_GetStringResult(interp)).to_string_lossy()
+ );
+ }
+ assert_eq!(init_status, TCL_OK as i32);
let script = CString::new("expr 2 + 2").unwrap();
let eval_status = Tcl_Eval(interp, script.as_ptr());
assert_eq!(eval_status, TCL_OK as i32);