summaryrefslogtreecommitdiff
path: root/tests/SomhairlesDream.Modeling.Tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests/SomhairlesDream.Modeling.Tests')
-rw-r--r--tests/SomhairlesDream.Modeling.Tests/PipelineTests.fs31
1 files changed, 31 insertions, 0 deletions
diff --git a/tests/SomhairlesDream.Modeling.Tests/PipelineTests.fs b/tests/SomhairlesDream.Modeling.Tests/PipelineTests.fs
index 7a5e3e1..221e7d7 100644
--- a/tests/SomhairlesDream.Modeling.Tests/PipelineTests.fs
+++ b/tests/SomhairlesDream.Modeling.Tests/PipelineTests.fs
@@ -60,6 +60,7 @@ type private TestBridge(?wrongObjectIds: bool) =
let private options root bridge =
{ PipelineOptions.ArtifactRoot = root
Ids = ids
+ Steps = Design.steps
Render = true
Bridge = bridge
Clock = fun () -> DateTimeOffset.Parse("2026-09-20T12:00:00Z")
@@ -89,6 +90,36 @@ let ``design steps expose the fixed ordered object contract`` () =
"heritage.crossbeam" |] = steps[2].ObjectIds)
[<Fact>]
+let ``probe design steps expose the cumulative real-probe contract`` () =
+ let steps = Design.probeSteps
+
+ Assert.Equal(7, steps.Length)
+ Assert.True([| "probe-01-bus"; "probe-02-boom"; "probe-03-rtg"; "probe-04-hga"; "probe-05-instruments"; "probe-06-mast"; "probe-07-livery" |] = (steps |> Array.map _.StepId))
+ Assert.True([| 0; 1; 2; 3; 4; 5; 6 |] = (steps |> Array.map _.Index))
+ Assert.Equal(22, steps[0].ObjectIds.Length)
+ Assert.Equal(31, steps[1].ObjectIds.Length)
+ Assert.Equal(43, steps[2].ObjectIds.Length)
+ Assert.Equal(49, steps[3].ObjectIds.Length)
+ Assert.Equal(55, steps[4].ObjectIds.Length)
+ Assert.Equal(56, steps[5].ObjectIds.Length)
+ Assert.Equal(56, steps[6].ObjectIds.Length)
+ Assert.True(steps[0].ObjectIds |> Array.contains "probe.bus.electronics.decagon")
+ Assert.True(steps[0].ObjectIds |> Array.contains "probe.bus.bay.panel.00")
+ Assert.True(steps[2].ObjectIds |> Array.contains "probe.rtg.01.fin.02")
+ Assert.True(steps[3].ObjectIds |> Array.contains "probe.hga.reflector")
+ Assert.True(steps[4].ObjectIds |> Array.contains "probe.optical.aperture")
+ Assert.True([| "probe.science.boom" |] = (steps[5].ObjectIds |> Array.except steps[4].ObjectIds))
+ Assert.True([||] = (steps[6].ObjectIds |> Array.except steps[5].ObjectIds))
+ Assert.Equal(6, steps[6].Changes.Length)
+ Assert.True(steps[6].Changes |> Array.forall (fun change -> change.Kind = "update"))
+
+[<Fact>]
+let ``design forProject selects steps by project id prefix`` () =
+ Assert.True(Design.steps = Design.forProject "heritage-001")
+ Assert.True(Design.probeSteps = Design.forProject "probe-001")
+ Assert.True(Design.probeSteps = Design.forProject "probe-42")
+
+[<Fact>]
let ``pipeline commits each step and writes manifest after complete event`` () =
withTempDirectory (fun root ->
let manifest = Pipeline.run (options root (TestBridge() :> IArtifactBridge)) |> expectOk