cl-loop - do you understand it well?

[Emanuel Berg]

So what is this eval'd to - an why?

Hint: All and any method is allowed!

;;; -*- lexical-binding: t -*-

(require 'cl-lib)

(cl-loop
  for i from 0 to 1
  collect (lambda () i) into funs
  finally return (apply #'+ (mapcar #'funcall funs)) )

-- 
underground experts united
https://dataswamp.org/~incal