tests: deepen all suites (37→87 checks, 0 failures, 100% pass)

lisp/core-context.lisp

@@ -185,3 +185,21 @@ Privacy-filtered objects (matching bouncer-privacy-tags) are excluded."
   (let ((output (context-awareness-assemble)))
     (is (search "Project 1" output))
     (is (search "Project 2" output))))
+
+(test test-context-empty-memory
+  "An empty memory should produce a clean awareness output without errors."
+  (clrhash passepartout::*memory-store*)
+  (let ((output (context-awareness-assemble)))
+    (is (stringp output))
+    (is (search "MEMEX" output :test #'char-equal))))
+
+(test test-context-no-foveal-focus
+  "Without a foveal focus, all content should be peripheral (no inline content)."
+  (clrhash passepartout::*memory-store*)
+  (let* ((ast '(:type :HEADLINE :properties (:ID "root" :TITLE "Root" :TAGS ("project"))
+                :contents ((:type :HEADLINE :properties (:ID "child" :TITLE "Child Node")
+                             :raw-content "CHILD CONTENT" :contents nil)))))
+    (ingest-ast ast)
+    (let ((output (context-awareness-assemble nil)))
+      (is (stringp output))
+      (is (not (search "CHILD CONTENT" output))))))