Protect D&D citation prompt ordering

internal/modules/dnd/extract/combatturns/scriptorium_assets_test.go

@@ -62,16 +62,44 @@ func TestScriptoriumPromptPreparesRequiredInputs(t *testing.T) {
 	if prepared.PromptID != PromptID || prepared.OutputContract.SchemaPath != "dnd_combat_turns_llm.v1.json" {
 		t.Fatalf("prepared prompt = %#v, want combat prompt identity and schema", prepared)
 	}
-	for _, want := range []string{transcript, "Dana: Mira", "Mira: ranger", "Greencloak: title", `{"npcs":[]}`} {
-		found := false
-		for _, message := range prepared.Messages {
-			if strings.Contains(message.Content, want) {
-				found = true
-				break
-			}
+	for index, want := range []struct {
+		role   string
+		cached bool
+	}{
+		{role: "system"},
+		{role: "user"},
+		{role: "user", cached: true},
+		{role: "user", cached: true},
+		{role: "user", cached: true},
+		{role: "user"},
+		{role: "user", cached: true},
+		{role: "user"},
+	} {
+		if index >= len(prepared.Messages) {
+			t.Fatalf("prepared prompt has %d messages, want at least %d", len(prepared.Messages), index+1)
 		}
-		if !found {
-			t.Fatalf("prepared prompt did not render required input %q", want)
+		message := prepared.Messages[index]
+		if message.Role != want.role {
+			t.Errorf("message %d role = %q, want %q", index, message.Role, want.role)
+		}
+		if want.cached {
+			if message.CacheControl == nil || message.CacheControl.Type != scriptorium.CacheControlEphemeral {
+				t.Errorf("message %d cache control = %#v, want ephemeral", index, message.CacheControl)
+			}
+		} else if message.CacheControl != nil {
+			t.Errorf("message %d cache control = %#v, want nil", index, message.CacheControl)
 		}
 	}
+	if len(prepared.Messages) != 8 {
+		t.Fatalf("prepared prompt has %d messages, want 8", len(prepared.Messages))
+	}
+	if references := prepared.Messages[3].Content; !strings.Contains(references, "Dana: Mira") || !strings.Contains(references, "Mira: ranger") || !strings.Contains(references, "Greencloak: title") {
+		t.Fatalf("campaign references message = %q, want rendered reference inputs", references)
+	}
+	if registry := prepared.Messages[4].Content; !strings.Contains(registry, `{"npcs":[]}`) {
+		t.Fatalf("NPC registry message = %q, want registry input", registry)
+	}
+	if final := prepared.Messages[7].Content; !strings.Contains(final, transcript) {
+		t.Fatalf("final message = %q, want transcript", final)
+	}
 }