✨ `str()` can be used on complex types

src/nasal_dbg.h

@@ -163,13 +163,11 @@ public:
         next(true), fsize(0),
         break_file_index(0), break_line(0),
         do_operand_count(false) {}
-    void run(
+    void run(const codegen&,
-        const codegen&,
              const linker&,
              const std::vector<std::string>&,
              bool,
-        bool
+             bool);
-    );
 };
 
 }

src/nasal_err.cpp

@@ -120,8 +120,9 @@ void error::warn(const std::string& stage, const std::string& info) {
     std::clog << orange << stage << ": " << white << info << reset << "\n\n";
 }
 
-void error::err(
+void error::err(const std::string& stage,
-    const std::string& stage, const span& loc, const std::string& info) {
+                const span& loc,
+                const std::string& info) {
     // load error occurred file into string lines
     load(loc.file);
 

src/nasal_import.cpp

@@ -41,8 +41,8 @@ std::string linker::get_path(expr* node) {
     return content->get_content();
 }
 
-std::string linker::find_real_file_path(
+std::string linker::find_real_file_path(const std::string& filename,
-    const std::string& filename, const span& location) {
+                                        const span& location) {
     // first add file name itself into the file path
     std::vector<fs::path> path_list = {filename};
 

src/nasal_parse.cpp

@@ -840,7 +840,8 @@ multi_identifier* parse::multi_id() {
 }
 
 tuple_expr* parse::multi_scalar() {
-    // if check_call_memory is true,we will check if value called here can reach a memory space
+    // if check_call_memory is true,
+    // we will check if value called here can reach a memory space
     const tok panic[] = {
         tok::id, tok::str,tok::num, tok::tktrue,
         tok::tkfalse, tok::opnot, tok::sub, tok::tknil,

src/nasal_type.cpp

@@ -98,6 +98,30 @@ std::ostream& operator<<(std::ostream& out, nas_hash& hash) {
     return out;
 }
 
+std::ostream& operator<<(std::ostream& out, nas_func& func) {
+    out << "func(";
+    
+    std::vector<std::string> argument_list = {};
+    argument_list.resize(func.keys.size());
+    for(const auto& key : func.keys) {
+        argument_list[key.second-1] = key.first;
+    }
+
+    for(const auto& key : argument_list) {
+        out << key;
+        if (key != argument_list.back()) {
+            out << ", ";
+        }
+    }
+    if (func.dynamic_parameter_index>=0) {
+        out << (argument_list.size()? ", ":"");
+        out << func.dynamic_parameter_name << "...";
+    }
+
+    out << ") {..}";
+    return out;
+}
+
 void nas_func::clear() {
     dynamic_parameter_index = -1;
     local.clear();
@@ -256,7 +280,10 @@ std::string var::to_str() {
         tmp.erase(tmp.find_last_not_of('.')+1, std::string::npos);
         return tmp;
     }
-    return "";
+
+    std::stringstream ss;
+    ss << *this;
+    return ss.str();
 }
 
 std::ostream& operator<<(std::ostream& out, var& ref) {
@@ -267,7 +294,7 @@ std::ostream& operator<<(std::ostream& out, var& ref) {
         case vm_type::vm_str:   out << ref.str();   break;
         case vm_type::vm_vec:   out << ref.vec();   break;
         case vm_type::vm_hash:  out << ref.hash();  break;
-        case vm_type::vm_func:  out << "func(..) {..}"; break;
+        case vm_type::vm_func:  out << ref.func();  break;
         case vm_type::vm_ghost: out << ref.ghost(); break;
         case vm_type::vm_co:    out << ref.co();    break;
         case vm_type::vm_map:   out << ref.map();   break;

src/nasal_type.h

@@ -15,6 +15,7 @@ enum class vm_type: u8 {
     vm_ret,      // return addres(program counter) 
     vm_nil,      // nil
     vm_num,      // number
+
     /* gc object */
     vm_str,      // string
     vm_vec,      // vector
@@ -24,6 +25,7 @@ enum class vm_type: u8 {
     vm_ghost,    // ghost type
     vm_co,       // coroutine
     vm_map,      // for globals and namespaces
+
     /* mark type range */
     vm_type_size_max
 };
@@ -153,9 +155,13 @@ struct nas_func {
     // parameter table, u32 begins from 1
     std::unordered_map<std::string, u32> keys;
 
+    // dynamic parameter name
+    std::string dynamic_parameter_name;
+
     nas_func():
         dynamic_parameter_index(-1), entry(0),
-        parameter_size(0), local_size(0) {}
+        parameter_size(0), local_size(0),
+        dynamic_parameter_name("") {}
     void clear();
 };
 
@@ -277,6 +283,7 @@ struct nas_val {
 
 std::ostream& operator<<(std::ostream&, nas_vec&);
 std::ostream& operator<<(std::ostream&, nas_hash&);
+std::ostream& operator<<(std::ostream&, nas_func&);
 std::ostream& operator<<(std::ostream&, nas_map&);
 std::ostream& operator<<(std::ostream&, const nas_ghost&);
 std::ostream& operator<<(std::ostream&, const nas_co&);

src/nasal_vm.h

@@ -311,6 +311,7 @@ inline void vm::o_deft() {
 
 inline void vm::o_dyn() {
     ctx.top[0].func().dynamic_parameter_index = imm[ctx.pc];
+    ctx.top[0].func().dynamic_parameter_name = const_string[imm[ctx.pc]];
 }
 
 inline void vm::o_lnot() {