From bc9e5b9a90a01e6c6f9024cd258b0d691f84aafc Mon Sep 17 00:00:00 2001
From: Mike Nolan <tesses@tesses.net>
Date: Fri, 3 Oct 2025 11:05:57 -0500
Subject: [PATCH] Add helper for tytd and fix arguments

---
 src/runtime_methods/dictionary.cpp | 46 +++++++++++++++++++++++++++++-
 src/vm/vm.cpp                      |  3 +-
 2 files changed, 47 insertions(+), 2 deletions(-)

diff --git a/src/runtime_methods/dictionary.cpp b/src/runtime_methods/dictionary.cpp
index d82a8f3..b161ad9 100644
--- a/src/runtime_methods/dictionary.cpp
+++ b/src/runtime_methods/dictionary.cpp
@@ -2,6 +2,50 @@
 
 namespace Tesses::CrossLang
 {
+    TObject Dictionary_FindByKey(GCList& ls, std::vector<TObject> args)
+    {
+        TList* dest = TList::Create(ls);
+        ls.GetGC()->BarrierBegin();
+        std::string key;
+        if(GetArgument(args,1,key))
+        {
+
+            std::function<void(TObject)> crawl;
+            crawl = [&](TObject o) -> void {
+                TDictionary* dict;
+                TList* list;
+                TAssociativeArray* aa;
+                if(GetObjectHeap(o,aa))
+                {
+                    std::string k0;
+                    for(auto& item : aa->items)
+                    {
+                        
+                        if(GetObject(item.first,k0) && k0 == key) dest->Add(item.second);
+                        crawl(item.second);
+                    }
+                }
+                if(GetObjectHeap(o,dict))
+                {
+                    for(auto& item : dict->items)
+                    {
+                        if(item.first == key) dest->Add(item.second);
+                        crawl(item.second);
+                    }
+                }
+                if(GetObjectHeap(o,list))
+                {
+                    for(auto& item : list->items)
+                    {
+                        crawl(item);
+                    }
+                }
+            };
+            crawl(args[0]);
+        }
+        ls.GetGC()->BarrierEnd();
+        return dest;
+    }
     TObject Dictionary_Items(GCList& ls, std::vector<TObject> args)
     {
         
@@ -94,7 +138,7 @@ namespace Tesses::CrossLang
         
 
         gc->BarrierBegin();
-       
+        dict->DeclareFunction(gc, "FindByKey","Scan object recursively, return list of items with key",{"obj","key"}, Dictionary_FindByKey);
         dict->DeclareFunction(gc, "Items","Get Dictionary Item Enumerable, for the each(item : Dictionary.Items(myDict)){item.Key; item.Value;}",{"dictionary"},Dictionary_Items);
         dict->DeclareFunction(gc, "SetField","Set a field in dictionary",{"dict","key","value"},Dictionary_SetField);
         dict->DeclareFunction(gc, "GetField","Get a field in dictionary",{"dict","key"},Dictionary_GetField);
diff --git a/src/vm/vm.cpp b/src/vm/vm.cpp
index 67767df..009199d 100644
--- a/src/vm/vm.cpp
+++ b/src/vm/vm.cpp
@@ -7273,7 +7273,8 @@ namespace Tesses::CrossLang {
             {
                 cse->env->DeclareVariable(trimStart(closure->closure->args[i]), args[i]);
             }
-            if(i == closure->closure->args.size()-1)
+            std::string back = closure->closure->args.empty() ? std::string() : closure->closure->args.back();
+            if(i == closure->closure->args.size()-1 && back.size() > 2 && back[0] == '$' && back[1] == '$')
             {
                 auto argName = closure->closure->args[i];
                 auto lsArgs = TList::Create(ls);