{"body":";;; Case 1\n(let ((value (loop named froboz\n                   for foo = (let ((footemp <something>))\n                               (unless footemp (return-from froboz nil))\n                               footemp)\n                   for bar = <something-using-foo>\n                   for baz = <something-using-bar>\n                   collect (something-using foo bar baz))))\n  ...)\n\n;;; Case 2\n(let ((value (let (result)\n               (loop named froboz\n                     for foo = <something>\n                     while foo\n                     (let ((bar <something-using-foo>)\n                           (baz <something-using-baz>))\n                       (push (something-using foo bar baz) result)))\n               (nreverse result))))\n  ...)\n","name":"","extension":"txt","url":"https://www.irccloud.com/pastebin/jPwKxG5V","modified":1566862962,"id":"jPwKxG5V","size":753,"lines":20,"own_paste":false,"theme":"","date":1566862962}