calebsmith

; This uses only fn and def in Clojure to create non-negative integers and pairs.
; (This restricts the language to only using lambda calculus.)



; Church numerals

(defn succ [n]
  (fn [f]
    (fn [x]

calebsmith

(define (contains-cycle? lst)
  (let inner ((a (nil-safe-cdr lst))
              (b (nil-safe-cdr (nil-safe-cdr lst))))
     (cond ((or (not (pair? a))
                (not (pair? b))) #f)
           ((or (eq? a b)
                (eq? a (nil-safe-cdr b))) #t)
           (else (inner (nil-safe-cdr a) (nil-safe-cdr (nil-safe-cdr b)))))))

calebsmith

 kcat -b localhost:29092 -t catchall_legacy -P -l test_events.jsonl