Merge pull request #16 from ECP-Solutions/change_run_procedure_to_function

Change `Run` procedure to function

Author: ws-garcia

CHANGELOG.md

@@ -2,6 +2,35 @@
 
 All notable changes for ASF. This file combines the release notes from the project's releases.
 
+## [v2.0.7] - 2026-01-28
+https://github.com/ECP-Solutions/ASF/releases/tag/v2.0.6
+
+## Summary
+
+ASF v2.0.7 is a minor improvement for `ASF` core ergonomic.
+
+---
+
+## Highlights
+
+- **Improved**: 
+	- ASF: the `Run` method now returns the result of the compiled program being executed.
+		```vb
+		Private Sub ForEachTest()
+ 		   Dim result As Variant
+ 		   Dim engine As ASF: Set engine = New ASF
+ 		   
+ 		   With engine
+		        result = .Run(.Compile("o = {x: 10, y: 20}; s = 0; o.forEach(fun(v) { s = s + v }); return(s);"))
+		    End With
+		    Set engine = Nothing
+		End Sub
+		```
+
+
+---
+**Full Changelog**: https://github.com/ECP-Solutions/ASF/compare/v2.0.6...v2.0.7
+
 ## [v2.0.6] - 2026-01-23
 https://github.com/ECP-Solutions/ASF/releases/tag/v2.0.6
 

docs/API.md

@@ -31,7 +31,7 @@ This document describes the runtime API exposed by ASF scripts and the VM builti
 
 ## Runtime model & conventions
 
-- **Program**: a compiled AST that can be executed by the VM. The ASF host exposes `.Compile(script)` → programIndex and `.Run(programIndex)` to run.
+- **Program**: a compiled AST that can be executed by the VM. The ASF host exposes `.Compile(script)` → programIndex and `.Run(programIndex)` to run. The `Run` method returns the result of the program being executed.
 - **Scope / closures**: closures capture the environment by reference (shared-write semantics). That means nested functions can mutate outer-scope variables and see changes across closures.
 - **Indexing base**: arrays honor `__option_base` set in runtime globals (commonly 0 or 1). All array helpers and methods handle this consistently.
 - **Call signature for array callbacks**:

docs/Language reference.md

@@ -105,13 +105,8 @@ Sub RunASFCode()
     code = "let x = 10; print(x * 2);"
     
     ' Compile and run
-    Dim idx As Long
-    idx = engine.Compile(code)
-    engine.Run idx
-    
-    ' Get output (if function returns a value)
     Dim result As Variant
-    result = engine.OUTPUT_
+    result = engine.Run(engine.compile(code))
 End Sub
 ```
 

src/ASF.cls

@@ -45,12 +45,13 @@ End Sub
 Public Property Get OUTPUT_() As Variant
     vAssignment OUTPUT_, OUTPUT__
 End Property
-Public Sub Run(idx As Long)
+Public Function Run(idx As Long) As Variant
     If Not GLOBALS_ Is Nothing Then
         With VM_
             .SetGlobals GLOBALS_
             .RunProgramByIndex idx
             vAssignment OUTPUT__, .OUTPUT_
+            vAssignment Run, .OUTPUT_
                 If .verbose Then
                     Debug.Print "=== Runtime Log ==="
                     Dim elm As Variant
@@ -60,7 +61,7 @@ Public Sub Run(idx As Long)
                 End If
         End With
     End If
-End Sub
+End Function
 Private Sub vAssignment(ByRef var As Variant, ByRef vValue As Variant)
     If IsObject(vValue) Then
         Set var = vValue