xo-interpreter2 stack: work on runtime error representation [WIP]

xo-interpreter2/src/interpreter2/DClosure.cpp

@@ -6,6 +6,8 @@
 #include "Closure.hpp"
 #include "LambdaExpr.hpp"
 #include "LocalEnv.hpp"
+#include "VsmRcx.hpp"
+#include <xo/indentlog/scope.hpp>
 #include <cstddef>
 
 namespace xo {
@@ -33,7 +35,30 @@ namespace xo {
         DClosure::apply_nocheck(obj<ARuntimeContext> rcx,
                                 const DArray * args)
         {
-            (void)rcx;
+            scope log(XO_DEBUG(true));
+
+            auto vsm_rcx
+                = obj<ARuntimeContext,DVsmRcx>::from(rcx);
+
+            log && log(xtag("vsm_rcx.data", (void*)vsm_rcx.data()));
+
+            // let's try a not-implemented error
+
+            // don't want to clutter Procedure facet, since it's
+            // lower-level than xo-interpreter2
+
+#ifdef NOT_YET
+            // TODO: verify arguments against type signature.
+            //       unless we have evidence that program is type correct
+
+            int32_t n_args = this->n_args();
+
+            if (n_args != args->size()) {
+                // 
+            }
+#endif
+
+
             (void)args;
 
             assert(false);