add js async mark on let bind; tag 0.9.10

Author: tiye

Cargo.lock

@@ -1,6 +1,6 @@
 [package]
 name = "calcit"
-version = "0.9.9"
+version = "0.9.10"
 authors = ["jiyinyiyong <jiyinyiyong@gmail.com>"]
 edition = "2024"
 license = "MIT"

Cargo.toml

@@ -100,7 +100,7 @@ Read more in [Respo Calcit Workflow](https://github.com/calcit-lang/respo-calcit
 
 ```cirru
 {}
-  :calcit-version |0.9.9
+  :calcit-version |0.9.10
   :dependencies $ {}
     |calcit-lang/memof |0.0.11
     |calcit-lang/lilac |main

README.md

@@ -1,6 +1,6 @@
 {
   "name": "@calcit/procs",
-  "version": "0.9.9",
+  "version": "0.9.10",
   "main": "./lib/calcit.procs.mjs",
   "devDependencies": {
     "@types/node": "^22.10.7",

package.json

@@ -189,12 +189,23 @@ fn quote_to_js(xs: &Calcit, var_prefix: &str, tags: &RefCell<HashSet<EdnTag>>) -
   }
 }
 
-fn make_let_with_bind(left: &str, right: &str, body: &str) -> String {
-  format!("(function __bind__({left}){{\n{body} }})({right})")
+fn make_let_with_bind(left: &str, right: &str, body: &str, has_await: bool) -> String {
+  let (await_mark, async_mark) = if has_await {
+    ("await ", "async ")
+  } else {
+    ("", "")
+  };
+  format!("{await_mark}({async_mark}function __bind__({left}){{\n{body} }})({right})")
+
 }
 
-fn make_let_with_wrapper(left: &str, right: &str, body: &str) -> String {
-  format!("(function __let__(){{ \nlet {left} = {right};\n {body} }})()")
+fn make_let_with_wrapper(left: &str, right: &str, body: &str, has_await: bool) -> String {
+  let (await_mark, async_mark) = if has_await {
+    ("await ", "async ")
+  } else {
+    ("", "")
+  };
+  format!("{await_mark}({async_mark}function __let__(){{ \nlet {left} = {right};\n {body} }})()")
 }
 
 fn make_fn_wrapper(body: &str, is_async: bool) -> String {
@@ -762,9 +773,9 @@ fn gen_let_code(
 
               // first variable is using conflicted name
               let ret = if local_defs.contains(sym) {
-                make_let_with_bind(&left, &right, &body_part)
+                make_let_with_bind(&left, &right, &body_part, has_await)
               } else {
-                make_let_with_wrapper(&left, &right, &body_part)
+                make_let_with_wrapper(&left, &right, &body_part, has_await)
               };
               return match base_return_label {
                 Some(label) => Ok(format!("{label}{ret}")),