1. Forum
  2. Usenet
  3. COMP.LANG.SCHEME

  • Re: (funcall #'or my-list)

    From B. Pym@21:1/5 to Frode Vatvedt Fjeld on Sat Aug 2 23:54:56 2025
    XPost: comp.lang.lisp

    Frode Vatvedt Fjeld wrote:

    What about (find-if #'identity my-list)? That seems to work.
    Anything better?

    For an obfuscation contest, I think (find-if #'null my-list :key
    #'not) would do well :) Otherwise, the function "some" is often
    used here. I like to define "true" as an alias for the "identity"
    function for such uses.

    Also, loop is often useful:

    (loop for x in my-list thereis x)

    Gauche Scheme

    Using "+" for "identity".

    gosh> (any + '(#f #f "DD"))
    "DD"
    gosh> (any + '(#f #f))
    #f

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)