code.delx.au - gnu-emacs/blob - test/lisp/emacs-lisp/package-resources/macro-problem-package-1.0/macro-problem.el

   1 ;;; macro-problem.el --- laksd                                  -*- lexical-binding: t; -*-
   2
   3 ;; Author: Artur Malabarba <emacs@endlessparentheses.com>
   4 ;; Keywords: tools
   5 ;; Version: 1.0
   6
   7 ;;; Code:
   8
   9 (require 'macro-aux)
  10
  11 (defmacro macro-problem-1 ( &rest forms)
  12   "Description"
  13   `(progn ,@forms))
  14
  15 (defun macro-problem-func ()
  16   ""
  17   (macro-problem-1 'a 'b)
  18   (macro-aux-1 'a 'b))
  19
  20 (provide 'macro-problem)
  21 ;;; macro-problem.el ends here