Skip to content

macroexpand-all function that calls each implementation's equivalent

License

Notifications You must be signed in to change notification settings

cbaggers/trivial-macroexpand-all

Repository files navigation

trivial-macroexpand-all

Provides a macroexpand-all function that calls the implementation specific equivalent.

Supports: abcl, allegro, ccl, clisp, cmucl, corman, lispworks, mkcl, sbcl, ecl & scl

If you the function from a supported implementation then the three return values are:

  • the expanded form
  • t
  • t, if the implementation specific equivalent accepts an environment

If you the function from an usupported implementation then the three return values are:

  • the original form
  • nil
  • nil

Example

CL-USER> (trivial-macroexpand-all:macroexpand-all '(or 1 2 3 4))

(LET ((#:G622 1))
  (IF #:G622
      #:G622
      (LET ((#:G623 2))
        (IF #:G623
            #:G623
            (LET ((#:G624 3))
              (IF #:G624
                  #:G624
                  4)))))

Trivial..again?

Yup another library using the trivial-* naming convention, but look at the source.. it's pretty damn trivial

About

macroexpand-all function that calls each implementation's equivalent

Resources

License

Stars

Watchers

Forks

Releases

No releases published

Packages

No packages published