Initial Dever 0.0.1

test/rust/native/record.rs

@@ -0,0 +1,54 @@
+use super::{Directory, fixture};
+use dever::compiler::{build, project::Project};
+
+#[test]
+fn nested_calls_keep_earlier_borrowed_arguments_live() {
+    let directory = Directory::new();
+    let project = Project::load(&fixture().with_file_name("borrowed_call.dever")).unwrap();
+    let program = project.check().unwrap();
+    let binary = build::build(
+        &program,
+        &project.sources,
+        "verify",
+        &directory.0.join("borrowed"),
+    )
+    .unwrap();
+    let output = std::process::Command::new(binary).output().unwrap();
+    assert!(
+        output.status.success(),
+        "{}",
+        String::from_utf8_lossy(&output.stderr)
+    );
+    assert_eq!(output.stdout, b"true\n");
+}
+
+#[test]
+fn copied_record_updates_preserve_old_fields_aliases_and_faults() {
+    let directory = Directory::new();
+    let project = Project::load(&fixture().with_file_name("record_update.dever")).unwrap();
+    let program = project.check().unwrap();
+    for entry in ["verify", "faultEntry"] {
+        let binary =
+            build::build(&program, &project.sources, entry, &directory.0.join(entry)).unwrap();
+        let output = std::process::Command::new(binary).output().unwrap();
+        if entry == "verify" {
+            assert!(
+                output.status.success(),
+                "{}",
+                String::from_utf8_lossy(&output.stderr)
+            );
+            assert_eq!(output.stdout, b"true\n");
+        } else {
+            assert!(!output.status.success());
+            assert!(output.stdout.is_empty());
+            let stderr = String::from_utf8(output.stderr).unwrap();
+            let source = &project.sources[0];
+            let (line, column) = source.position(source.text.find("state.count + delta").unwrap());
+            assert!(stderr.contains("integer arithmetic fault"), "{stderr}");
+            assert!(
+                stderr.contains(&format!("{}:{line}:{column}:", source.path.display())),
+                "{stderr}"
+            );
+        }
+    }
+}