2020-04-21 17:01:10 +02:00
|
|
|
use super::{reg_binary, reg_binary_mut, reg_none, reg_unary, reg_unary_mut};
|
2020-04-20 18:11:25 +02:00
|
|
|
|
2020-04-21 17:01:10 +02:00
|
|
|
use crate::def_package;
|
2020-04-20 18:11:25 +02:00
|
|
|
use crate::engine::{Array, Map, FUNC_TO_STRING, KEYWORD_DEBUG, KEYWORD_PRINT};
|
|
|
|
use crate::fn_register::map_dynamic as map;
|
|
|
|
use crate::parser::INT;
|
|
|
|
|
|
|
|
use crate::stdlib::{
|
|
|
|
fmt::{Debug, Display},
|
|
|
|
format,
|
|
|
|
};
|
|
|
|
|
|
|
|
// Register print and debug
|
|
|
|
fn to_debug<T: Debug>(x: &mut T) -> String {
|
|
|
|
format!("{:?}", x)
|
|
|
|
}
|
|
|
|
fn to_string<T: Display>(x: &mut T) -> String {
|
|
|
|
format!("{}", x)
|
|
|
|
}
|
|
|
|
fn format_map(x: &mut Map) -> String {
|
|
|
|
format!("#{:?}", x)
|
|
|
|
}
|
|
|
|
|
|
|
|
macro_rules! reg_op { ($lib:expr, $op:expr, $func:ident, $($par:ty),*) => {
|
|
|
|
$(reg_unary_mut($lib, $op, $func::<$par>, map);)* };
|
|
|
|
}
|
|
|
|
|
2020-04-21 17:01:10 +02:00
|
|
|
def_package!(BasicStringPackage:"Basic string utilities, including printing.", lib, {
|
|
|
|
reg_op!(lib, KEYWORD_PRINT, to_string, INT, bool, char);
|
|
|
|
reg_op!(lib, FUNC_TO_STRING, to_string, INT, bool, char);
|
2020-04-20 18:11:25 +02:00
|
|
|
|
2020-04-21 17:01:10 +02:00
|
|
|
reg_none(lib, KEYWORD_PRINT, || "".to_string(), map);
|
|
|
|
reg_unary(lib, KEYWORD_PRINT, |_: ()| "".to_string(), map);
|
|
|
|
reg_unary(lib, FUNC_TO_STRING, |_: ()| "".to_string(), map);
|
2020-04-20 18:11:25 +02:00
|
|
|
|
2020-04-21 17:01:10 +02:00
|
|
|
reg_unary_mut(lib, KEYWORD_PRINT, |s: &mut String| s.clone(), map);
|
|
|
|
reg_unary_mut(lib, FUNC_TO_STRING, |s: &mut String| s.clone(), map);
|
2020-04-20 18:11:25 +02:00
|
|
|
|
2020-04-21 17:01:10 +02:00
|
|
|
reg_op!(lib, KEYWORD_DEBUG, to_debug, INT, bool, (), char, String);
|
2020-04-20 18:11:25 +02:00
|
|
|
|
2020-04-21 17:01:10 +02:00
|
|
|
#[cfg(not(feature = "only_i32"))]
|
|
|
|
#[cfg(not(feature = "only_i64"))]
|
|
|
|
{
|
|
|
|
reg_op!(lib, KEYWORD_PRINT, to_string, i8, u8, i16, u16, i32, u32);
|
|
|
|
reg_op!(lib, FUNC_TO_STRING, to_string, i8, u8, i16, u16, i32, u32);
|
|
|
|
reg_op!(lib, KEYWORD_DEBUG, to_debug, i8, u8, i16, u16, i32, u32);
|
|
|
|
reg_op!(lib, KEYWORD_PRINT, to_string, i64, u64, i128, u128);
|
|
|
|
reg_op!(lib, FUNC_TO_STRING, to_string, i64, u64, i128, u128);
|
|
|
|
reg_op!(lib, KEYWORD_DEBUG, to_debug, i64, u64, i128, u128);
|
2020-04-20 18:11:25 +02:00
|
|
|
}
|
|
|
|
|
2020-04-21 17:01:10 +02:00
|
|
|
#[cfg(not(feature = "no_float"))]
|
|
|
|
{
|
|
|
|
reg_op!(lib, KEYWORD_PRINT, to_string, f32, f64);
|
|
|
|
reg_op!(lib, FUNC_TO_STRING, to_string, f32, f64);
|
|
|
|
reg_op!(lib, KEYWORD_DEBUG, to_debug, f32, f64);
|
|
|
|
}
|
2020-04-20 18:11:25 +02:00
|
|
|
|
2020-04-21 17:01:10 +02:00
|
|
|
#[cfg(not(feature = "no_index"))]
|
|
|
|
{
|
|
|
|
reg_op!(lib, KEYWORD_PRINT, to_debug, Array);
|
|
|
|
reg_op!(lib, FUNC_TO_STRING, to_debug, Array);
|
|
|
|
reg_op!(lib, KEYWORD_DEBUG, to_debug, Array);
|
|
|
|
}
|
2020-04-20 18:11:25 +02:00
|
|
|
|
2020-04-21 17:01:10 +02:00
|
|
|
#[cfg(not(feature = "no_object"))]
|
|
|
|
{
|
|
|
|
reg_unary_mut(lib, KEYWORD_PRINT, format_map, map);
|
|
|
|
reg_unary_mut(lib, FUNC_TO_STRING, format_map, map);
|
|
|
|
reg_unary_mut(lib, KEYWORD_DEBUG, format_map, map);
|
2020-04-20 18:11:25 +02:00
|
|
|
}
|
2020-04-21 17:01:10 +02:00
|
|
|
|
|
|
|
reg_binary(
|
|
|
|
lib,
|
|
|
|
"+",
|
|
|
|
|mut s: String, ch: char| {
|
|
|
|
s.push(ch);
|
|
|
|
s
|
|
|
|
},
|
|
|
|
map,
|
|
|
|
);
|
|
|
|
reg_binary(
|
|
|
|
lib,
|
|
|
|
"+",
|
|
|
|
|mut s: String, s2: String| {
|
|
|
|
s.push_str(&s2);
|
|
|
|
s
|
|
|
|
},
|
|
|
|
map,
|
|
|
|
);
|
|
|
|
reg_binary_mut(lib, "append", |s: &mut String, ch: char| s.push(ch), map);
|
|
|
|
reg_binary_mut(
|
|
|
|
lib,
|
|
|
|
"append",
|
|
|
|
|s: &mut String, s2: String| s.push_str(&s2),
|
|
|
|
map,
|
|
|
|
);
|
|
|
|
});
|