Max Kirillov (max630) wrote,
Max Kirillov
max630

что мне не нравится в лисперах

чорт, не могу удержаться

предлагаю угадать, зачем писался приведённый код

(defmacro aif (test then &optional else)
  `(let ((it ,test))
     (if it ,then ,else)))


примерный аналог на C, если кто не ботает:

#define  AIF(__cond, __then, __else) do { \
 typeof (__cond) it = (__cond); \
 if (it) { __then; } else { __else; } \
} while(0)
Subscribe
  • Post a new comment

    Error

    default userpic

    Your reply will be screened

    Your IP address will be recorded 

    When you submit the form an invisible reCAPTCHA check will be performed.
    You must follow the Privacy Policy and Google Terms of use.
  • 8 comments