From e31ebb394c59014e88fc33560e2f1bee3ff0598c Mon Sep 17 00:00:00 2001 From: Amr Gharbeia Date: Sun, 3 May 2026 14:26:17 -0400 Subject: [PATCH] should fail --- lisp/core-loop-perceive.lisp | 1 + org/core-loop-perceive.org | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/core-loop-perceive.lisp b/lisp/core-loop-perceive.lisp index 0bd1a59..4f90f7c 100644 --- a/lisp/core-loop-perceive.lisp +++ b/lisp/core-loop-perceive.lisp @@ -129,3 +129,4 @@ FN receives (signal) and returns T if consumed, nil to continue." (test test-depth-limiting (let ((runaway-signal (list :type :EVENT :depth 11 :payload (list :sensor :heartbeat)))) (is (null (process-signal runaway-signal))))) +(defun bad-code () (broken diff --git a/org/core-loop-perceive.org b/org/core-loop-perceive.org index 6015194..22f93f9 100644 --- a/org/core-loop-perceive.org +++ b/org/core-loop-perceive.org @@ -249,4 +249,4 @@ Verifies that the perceive gate correctly ingests AST nodes into memory and that (test test-depth-limiting (let ((runaway-signal (list :type :EVENT :depth 11 :payload (list :sensor :heartbeat)))) (is (null (process-signal runaway-signal))))) -#+end_src \ No newline at end of file +#+end_src(defun bad-code () (broken