)
func TestCompactorSendsThePromptToolsAndTask(t *testing.T) {
- server := newFakeResponses(t)
+ server := newModelFake(t)
compactor := newTestCompactor(t, server)
line, err := compactor.Summarize(t.Context(), Task{
Level: 0,
Index: 7,
- Context: "<chat>\n0+4|a\n4+1|b\n5+1|c\n6+1|d\n7+1|e\n</chat>",
+ Context: "<chat>\n0+4|user: earlier\n</chat>",
Input: []string{"user: " + strings.Repeat("x", 600)},
})
require.NoError(t, err)
require.Equal(t, 1, server.Calls())
body := server.Call(0).body
- require.Equal(t, prompt("Ada"), body["instructions"])
+ require.Equal(t, prompt("Ada", ""), body["instructions"])
require.Equal(t, "gpt-test", body["model"])
require.Equal(t, map[string]any{"effort": "high"}, body["reasoning"])
require.Equal(t, "agent-key", body["prompt_cache_key"])
parts := inputParts(t, server.Call(0))
require.Equal(t, []string{
- "<chat>\n",
- "0+4|a\n4+1|b\n5+1|c\n6+1|d\n",
- "7+1|e\n</chat>\n" +
- "Compaction: compress message 7 into one line of at most 512 bytes\n" +
+ "<chat>\n0+4|user: earlier\n</chat>\n",
+ "Compaction: compress message 7 into one line of at most 512 bytes\n" +
"(about 70 words), the length of this ruler:\n" +
strings.Repeat("-", 512) + "\n" +
"<input>\nuser: " + strings.Repeat("x", 600) + "\n</input>",
}, parts)
}
-func TestCompactionPartsEndWithTheRestAndTheTask(t *testing.T) {
- testCases := []struct {
- name string
- context string
- want []string
- }{
- {
- name: "empty view has the opening tag and the last part",
- context: "<chat>\n</chat>",
- want: []string{"<chat>\n", "</chat>\nTASK"},
- },
- {
- name: "lines short of a block go into the last part",
- context: "<chat>\n0+1|a\n1+1|b\n2+1|c\n</chat>",
- want: []string{"<chat>\n", "0+1|a\n1+1|b\n2+1|c\n</chat>\nTASK"},
- },
- {
- name: "one whole block",
- context: "<chat>\n0+1|a\n1+1|b\n2+1|c\n3+1|d\n</chat>",
- want: []string{"<chat>\n", "0+1|a\n1+1|b\n2+1|c\n3+1|d\n", "</chat>\nTASK"},
- },
- {
- name: "two whole blocks and a rest",
- context: "<chat>\n0+2|a\n2+1|b\n3+1|c\n4+1|d\n5+1|e\n6+1|f\n7+1|g\n8+1|h\n9+1|i\n</chat>",
- want: []string{
- "<chat>\n",
- "0+2|a\n2+1|b\n3+1|c\n4+1|d\n",
- "5+1|e\n6+1|f\n7+1|g\n8+1|h\n",
- "9+1|i\n</chat>\nTASK",
- },
- },
- }
-
- for _, tc := range testCases {
- t.Run(tc.name, func(t *testing.T) {
- parts := compactionParts(tc.context, "TASK")
- require.Equal(t, tc.want, parts)
- require.Equal(t, tc.context+"\nTASK", strings.Join(parts, ""))
- })
- }
-}
-
-func TestCompactionPartsOfALongerViewBeginWithTheBlocksOfAShorterOne(t *testing.T) {
- shorter := compactionParts("<chat>\n0+1|a\n1+1|b\n2+1|c\n3+1|d\n4+1|e\n</chat>", "task 5")
- longer := compactionParts("<chat>\n0+1|a\n1+1|b\n2+1|c\n3+1|d\n4+1|e\n5+1|f\n6+1|g\n7+1|h\n</chat>", "task 8")
- require.Len(t, shorter, 3)
- require.Equal(t, shorter[:2], longer[:2])
- require.NotEqual(t, shorter[2], longer[2])
-}
-
func TestCompactorWritesTheMergeTask(t *testing.T) {
text, err := compactionTask(Task{
Level: 2,
func TestCompactorRetriesALongLineWithTheNewestNote(t *testing.T) {
long := []string{strings.Repeat("a", 600), strings.Repeat("b", 550), strings.Repeat("c", 400)}
- server := newFakeResponses(t)
- server.reply = func(w http.ResponseWriter, call fakeCall) {
- writeEvents(w, completedEvent([]any{messageItem(long[call.number])}, 100, 0, 5))
+ server := newModelFake(t)
+ server.reply = func(w http.ResponseWriter, call ModelFakeCall) {
+ modelWriteEvents(w, modelCompletedEvent([]any{modelMessageItem(long[call.number])}, 100, 0, 5))
}
compactor := newTestCompactor(t, server)
require.Equal(t, long[2], line)
require.Equal(t, 3, server.Calls())
- records := readUsage(t, compactor.client.usage.path)
+ records := modelReadUsage(t, compactor.client.usage.path)
require.Len(t, records, 3)
for n, record := range records {
require.Equal(t, &[2]int{0, 0}, record.Node)
func TestCompactorKeepsTheShortestOfFiveLines(t *testing.T) {
sizes := []int{700, 530, 600, 520, 560, 513}
- server := newFakeResponses(t)
- server.reply = func(w http.ResponseWriter, call fakeCall) {
- writeEvents(w, completedEvent([]any{messageItem(strings.Repeat("z", sizes[call.number]))}, 100, 0, 5))
+ server := newModelFake(t)
+ server.reply = func(w http.ResponseWriter, call ModelFakeCall) {
+ modelWriteEvents(w, modelCompletedEvent([]any{modelMessageItem(strings.Repeat("z", sizes[call.number]))}, 100, 0, 5))
}
line, err := newTestCompactor(t, server).Summarize(t.Context(), leafTask())
func TestCompactorFailsWithoutALine(t *testing.T) {
testCases := []struct {
name string
- reply func(http.ResponseWriter, fakeCall)
+ reply func(http.ResponseWriter, ModelFakeCall)
want string
}{
{
name: "failed call",
- reply: func(w http.ResponseWriter, call fakeCall) {
+ reply: func(w http.ResponseWriter, call ModelFakeCall) {
w.WriteHeader(http.StatusInternalServerError)
_, _ = io.WriteString(w, "down")
},
},
{
name: "tool call and no text",
- reply: func(w http.ResponseWriter, call fakeCall) {
- writeEvents(w, completedEvent([]any{map[string]any{"type": "function_call", "name": "zoom", "arguments": "{}"}}, 100, 0, 5))
+ reply: func(w http.ResponseWriter, call ModelFakeCall) {
+ modelWriteEvents(w, modelCompletedEvent([]any{map[string]any{"type": "function_call", "name": "zoom", "arguments": "{}"}}, 100, 0, 5))
},
want: "no line",
},
for _, tc := range testCases {
t.Run(tc.name, func(t *testing.T) {
- server := newFakeResponses(t)
+ server := newModelFake(t)
server.reply = tc.reply
_, err := newTestCompactor(t, server).Summarize(t.Context(), leafTask())
}
func TestCompactorBuildsNodesInTheCore(t *testing.T) {
- server := newFakeResponses(t)
- server.reply = func(w http.ResponseWriter, call fakeCall) {
+ server := newModelFake(t)
+ server.reply = func(w http.ResponseWriter, call ModelFakeCall) {
if call.number == 0 {
w.WriteHeader(http.StatusServiceUnavailable)
return
}
- writeEvents(w, completedEvent([]any{messageItem("summary of the long output")}, 100, 0, 5))
+ modelWriteEvents(w, modelCompletedEvent([]any{modelMessageItem("summary of the long output")}, 100, 0, 5))
}
memory, err := openMemory(t.Context(), t.TempDir(), newTestClock().Now, newTestCompactor(t, server))
require.Equal(t, 2, server.Calls())
}
-func newTestCompactor(t *testing.T, server *fakeResponses) *Compactor {
+func newTestCompactor(t *testing.T, server *ModelFake) *Compactor {
t.Helper()
- client := newClient(server.URL, apiKey(testKey), "agent-key", filepath.Join(t.TempDir(), "usage.jsonl"))
+ client := newModelClient(server.URL, ModelAPIKey(modelTestKey), "agent-key", filepath.Join(t.TempDir(), "usage.jsonl"))
- return newCompactor(client, "Ada", ModelConfig{
+ return newCompactor(client, adaPrompt, ModelConfig{
Model: "gpt-test",
Effort: "high",
})
}
+// adaPrompt returns the prompt of the agent Ada, without instructions.
+func adaPrompt() (string, error) {
+ return prompt("Ada", ""), nil
+}
+
func leafTask() Task {
return Task{
Level: 0,
}
// inputParts returns the texts of the one user message of call.
-func inputParts(t *testing.T, call fakeCall) []string {
+func inputParts(t *testing.T, call ModelFakeCall) []string {
t.Helper()
var body struct {
projects / onechat / blobdiff