Elektrine lite

← Feed

@aoeuidhtns@app.wafrn.net

Post #2433312

2026-05-12 00:24 UTC

@saagar@federated.saagarjha.com @RueNahcMohr@infosec.exchange `(mismatched bracket two characters after the s hold on, you've nerd sniped me, i need to make a "mocking lisp for all its parentheses generator", in lisp it'll be so easy :) ; yes, this is valid scheme code, if you define "in"

Replies (1)

  • @aoeuidhtns@app.wafrn.net 2026-05-12 01:18

    @RueNahcMohr@infosec.exchange @saagar@federated.saagarjha.com done?: (use-modules (srfi srfi-1) (srfi srfi-27)) (define (add-parens lst) (if (eq? (length lst) 1) lst (let ((rand (+ 1 (random-integer (- (length lst) 1))))) (list (add-parens (take lst rand)) (add-parens (drop lst rand)))))) (add-parens '(l i s p)) ; => ((l) ((i) ((s) (p))))

    Open ##2433313