diff options
Diffstat (limited to 'locale/fr/LC_MESSAGES/_pastebins/2016-04-05-rpn-macro-setup.po')
-rw-r--r-- | locale/fr/LC_MESSAGES/_pastebins/2016-04-05-rpn-macro-setup.po | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/locale/fr/LC_MESSAGES/_pastebins/2016-04-05-rpn-macro-setup.po b/locale/fr/LC_MESSAGES/_pastebins/2016-04-05-rpn-macro-setup.po index a5eea70..5340de6 100644 --- a/locale/fr/LC_MESSAGES/_pastebins/2016-04-05-rpn-macro-setup.po +++ b/locale/fr/LC_MESSAGES/_pastebins/2016-04-05-rpn-macro-setup.po @@ -8,3 +8,24 @@ msgid "" "layout: pastebin\n" "lang: en" msgstr "" + +msgid "" +"(defmacro rpn (body)\n" +" (rpn-expander body))\n" +"\n" +"(defun rpn-expander (body)\n" +" (mapcar (lambda (x)\n" +" (if (listp x)\n" +" (rpn-expander x)\n" +" x))\n" +" (reverse body)))\n" +"\n" +"(rpn ((2 1 +) 2 *))\n" +"; => 6\n" +"\n" +"#|\n" +"Just a quick stub.\n" +"\n" +"One could easily improve #'RPN-EXPANDER in order to better suit one's needs.\n" +"|#\n" +msgstr "" |