Fix failing tests in AquaVM (#207)

Author: coder11

.github/workflows/snapshot.yml

@@ -9,6 +9,10 @@ on:
       marine-js-version:
         description: "@fluencelabs/marine-js version"
         type: string
+      ref:
+        description: "git ref to checkout to"
+        type: string
+        default: "master"
     outputs:
       fluence-js-version:
         description: "@fluencelabs/fluence version"
@@ -35,6 +39,7 @@ jobs:
         uses: actions/checkout@v3
         with:
           repository: fluencelabs/fluence-js
+          ref: ${{ inputs.ref }}
 
       - uses: pnpm/[email protected]
         with:

.github/workflows/tests.yml

@@ -13,6 +13,10 @@ on:
       marine-js-version:
         description: "@fluencelabs/marine-js version"
         type: string
+      ref:
+        description: "git ref to checkout to"
+        type: string
+        default: "master"
 
 env:
   RUST_PEER_IMAGE: "${{ inputs.rust-peer-image }}"
@@ -59,6 +63,7 @@ jobs:
         uses: actions/checkout@v3
         with:
           repository: fluencelabs/fluence-js
+          ref: ${{ inputs.ref }}
 
       - name: Pull rust-peer image
         run: docker pull $RUST_PEER_IMAGE

packages/fluence-js/package.json

@@ -1,6 +1,6 @@
 {
     "name": "@fluencelabs/fluence",
-    "version": "0.27.1",
+    "version": "0.27.2",
     "description": "TypeScript implementation of Fluence Peer",
     "main": "./dist/index.js",
     "typings": "./dist/index.d.ts",

packages/fluence-js/src/__test__/integration/avm.spec.ts

@@ -85,7 +85,10 @@ describe('Avm spec', () => {
                             (call %init_peer_id% ("peer" "timeout") [1000 arg] $result)
                             (call %init_peer_id% ("op" "identity") ["fast_result"] $result)
                         )
-                        (call %init_peer_id% ("return" "return") [$result.$[0]]) 
+                        (seq
+                            (canon %init_peer_id% $result #result)
+                            (call %init_peer_id% ("return" "return") [#result.$[0]]) 
+                        )
                     )
                 )
             `;
@@ -121,13 +124,19 @@ describe('Avm spec', () => {
                                 (call "invalid_peer" ("op" "identity") ["never"] $ok_or_err) 
                             )
                             (xor
-                                (match $ok_or_err.$[0] "timeout_msg"
-                                    (ap "failed_with_timeout" $result)
+                                (seq
+                                    (canon %init_peer_id% $ok_or_err #ok_or_err)
+                                    (match #ok_or_err.$[0] "timeout_msg"
+                                        (ap "failed_with_timeout" $result)
+                                    )
                                 )
                                 (ap "impossible happened" $result)
                             )
                         )
-                        (call %init_peer_id% ("return" "return") [$result.$[0]]) 
+                        (seq
+                            (canon %init_peer_id% $result #result)
+                            (call %init_peer_id% ("return" "return") [#result.$[0]]) 
+                        )
                     )
                 )
             `;