test: fix test exports

Author: PaoloPenazzi

src/core/lang/execution.rs

@@ -128,6 +128,25 @@ mod test {
         exports
     }
 
+    #[test]
+    fn foldhood_alignment() {
+        // Export of device 2: Export(/ -> "1", FoldHood(0) -> "1", FoldHood(0) / Nbr(0) -> 4)
+        let export_dev_2 = export!((path!(), 1), (path!(FoldHood(0)), 1), (path!(Nbr(0), FoldHood(0)), 4));
+        // Export of device 4: Export(/ -> "3", FoldHood(0) -> "3")
+        let export_dev_4 = export!((path!(), 3), (path!(FoldHood(0)), 3));
+        let mut exports: HashMap<i32, Export> = HashMap::new();
+        exports.insert(2, export_dev_2);
+        exports.insert(4, export_dev_4);
+        let context = Context::new(0, Default::default(), Default::default(), exports);
+        // Program: foldhood(-5)(_ + _)(nbr(2))
+        let program = |vm| foldhood(vm,
+                                    || -5,
+                                    | a, b| (a + b),
+                                    |vm1| nbr(vm1, |vm2| (vm2, 2)));
+        let result = round(init_with_ctx(context), program);
+        assert_eq!(-4, result.1);
+    }
+
     #[test]
     fn test_foldhood() {
         let context = Context::new(0, Default::default(), Default::default(), create_export_foldhood_test());