2013-04-07 17:35:10 +02:00
|
|
|
=========================
|
|
|
|
Internal Hy Documentation
|
|
|
|
=========================
|
|
|
|
|
2014-01-02 16:28:03 +01:00
|
|
|
.. note:: These bits are mostly useful for folks who hack on Hy itself,
|
|
|
|
but can also be used for those delving deeper in macro programming.
|
2013-04-07 17:35:10 +02:00
|
|
|
|
2014-01-02 16:27:32 +01:00
|
|
|
.. _models:
|
2013-04-07 17:35:10 +02:00
|
|
|
|
|
|
|
Hy Models
|
|
|
|
=========
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Introduction to Hy Models
|
2014-01-02 16:27:32 +01:00
|
|
|
-------------------------
|
|
|
|
|
|
|
|
Hy models are a very thin layer on top of regular Python objects,
|
|
|
|
representing Hy source code as data. Models only add source position
|
|
|
|
information, and a handful of methods to support clean manipulation of
|
|
|
|
Hy source code, for instance in macros. To achieve that goal, Hy models
|
|
|
|
are mixins of a base Python class and :ref:`HyObject`.
|
|
|
|
|
|
|
|
.. _hyobject:
|
|
|
|
|
|
|
|
HyObject
|
|
|
|
~~~~~~~~
|
|
|
|
|
|
|
|
``hy.models.HyObject`` is the base class of Hy models. It only
|
|
|
|
implements one method, ``replace``, which replaces the source position
|
|
|
|
of the current object with the one passed as argument. This allows us to
|
|
|
|
keep track of the original position of expressions that get modified by
|
|
|
|
macros, be that in the compiler or in pure hy macros.
|
|
|
|
|
|
|
|
``HyObject`` is not intended to be used directly to instantiate Hy
|
|
|
|
models, but only as a mixin for other classes.
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Compound Models
|
2014-01-02 16:27:32 +01:00
|
|
|
---------------
|
|
|
|
|
|
|
|
Parenthesized and bracketed lists are parsed as compound models by the
|
|
|
|
Hy parser.
|
|
|
|
|
2017-08-26 06:50:13 +02:00
|
|
|
Hy uses pretty-printing reprs for its compound models by default.
|
|
|
|
If this is causing issues,
|
|
|
|
it can be turned off globally by setting ``hy.models.PRETTY`` to ``False``,
|
|
|
|
or temporarily by using the ``hy.models.pretty`` context manager.
|
|
|
|
|
|
|
|
Hy also attempts to color pretty reprs using ``clint.textui.colored``.
|
|
|
|
This module has a flag to disable coloring,
|
|
|
|
and a method ``clean`` to strip colored strings of their color tags.
|
|
|
|
|
2018-04-15 05:58:52 +02:00
|
|
|
.. _hysequence:
|
2014-01-02 16:27:32 +01:00
|
|
|
|
2018-04-15 05:58:52 +02:00
|
|
|
HySequence
|
|
|
|
~~~~~~~~~~
|
2014-01-02 16:27:32 +01:00
|
|
|
|
2018-04-15 05:58:52 +02:00
|
|
|
``hy.models.HySequence`` is the abstract base class of "iterable" Hy
|
|
|
|
models, such as HyExpression and HyList.
|
2014-01-02 16:27:32 +01:00
|
|
|
|
2018-04-15 05:58:52 +02:00
|
|
|
Adding a HySequence to another iterable object reuses the class of the
|
2014-01-02 16:27:32 +01:00
|
|
|
left-hand-side object, a useful behavior when you want to concatenate Hy
|
|
|
|
objects in a macro, for instance.
|
|
|
|
|
2018-04-15 05:58:52 +02:00
|
|
|
|
|
|
|
.. _hylist:
|
|
|
|
|
|
|
|
HyList
|
2019-03-26 02:48:13 +01:00
|
|
|
~~~~~~
|
2018-04-15 05:58:52 +02:00
|
|
|
|
2019-03-26 02:48:13 +01:00
|
|
|
``hy.models.HyList`` is a :ref:`HySequence` for bracketed ``[]``
|
2018-04-15 05:58:52 +02:00
|
|
|
lists, which, when used as a top-level expression, translate to Python
|
|
|
|
list literals in the compilation phase.
|
|
|
|
|
|
|
|
|
2014-01-02 16:27:32 +01:00
|
|
|
.. _hyexpression:
|
|
|
|
|
|
|
|
HyExpression
|
|
|
|
~~~~~~~~~~~~
|
|
|
|
|
2018-04-15 05:58:52 +02:00
|
|
|
``hy.models.HyExpression`` inherits :ref:`HySequence` for
|
2014-01-02 16:27:32 +01:00
|
|
|
parenthesized ``()`` expressions. The compilation result of those
|
|
|
|
expressions depends on the first element of the list: the compiler
|
|
|
|
dispatches expressions between compiler special-forms, user-defined
|
|
|
|
macros, and regular Python function calls.
|
|
|
|
|
|
|
|
.. _hydict:
|
|
|
|
|
|
|
|
HyDict
|
|
|
|
~~~~~~
|
|
|
|
|
2018-04-15 05:58:52 +02:00
|
|
|
``hy.models.HyDict`` inherits :ref:`HySequence` for curly-bracketed
|
|
|
|
``{}`` expressions, which compile down to a Python dictionary literal.
|
2014-01-02 16:27:32 +01:00
|
|
|
|
|
|
|
The decision of using a list instead of a dict as the base class for
|
|
|
|
``HyDict`` allows easier manipulation of dicts in macros, with the added
|
|
|
|
benefit of allowing compound expressions as dict keys (as, for instance,
|
|
|
|
the :ref:`HyExpression` Python class isn't hashable).
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Atomic Models
|
2014-01-02 16:27:32 +01:00
|
|
|
-------------
|
|
|
|
|
|
|
|
In the input stream, double-quoted strings, respecting the Python
|
|
|
|
notation for strings, are parsed as a single token, which is directly
|
|
|
|
parsed as a :ref:`HyString`.
|
|
|
|
|
2014-02-24 17:12:36 +01:00
|
|
|
An uninterrupted string of characters, excluding spaces, brackets,
|
2014-01-02 16:27:32 +01:00
|
|
|
quotes, double-quotes and comments, is parsed as an identifier.
|
|
|
|
|
|
|
|
Identifiers are resolved to atomic models during the parsing phase in
|
|
|
|
the following order:
|
|
|
|
|
|
|
|
- :ref:`HyInteger <hy_numeric_models>`
|
|
|
|
- :ref:`HyFloat <hy_numeric_models>`
|
|
|
|
- :ref:`HyComplex <hy_numeric_models>` (if the atom isn't a bare ``j``)
|
|
|
|
- :ref:`HyKeyword` (if the atom starts with ``:``)
|
|
|
|
- :ref:`HySymbol`
|
|
|
|
|
|
|
|
.. _hystring:
|
|
|
|
|
|
|
|
HyString
|
|
|
|
~~~~~~~~
|
|
|
|
|
2018-04-23 19:52:22 +02:00
|
|
|
``hy.models.HyString`` represents string literals (including bracket strings),
|
2019-05-23 19:20:44 +02:00
|
|
|
which compile down to unicode string literals (``str``) in Python.
|
2014-01-02 16:27:32 +01:00
|
|
|
|
2018-04-23 19:52:22 +02:00
|
|
|
``HyString``\s are immutable.
|
2014-01-02 16:27:32 +01:00
|
|
|
|
|
|
|
Hy literal strings can span multiple lines, and are considered by the
|
|
|
|
parser as a single unit, respecting the Python escapes for unicode
|
|
|
|
strings.
|
|
|
|
|
2017-09-08 20:26:59 +02:00
|
|
|
``HyString``\s have an attribute ``brackets`` that stores the custom
|
|
|
|
delimiter used for a bracket string (e.g., ``"=="`` for ``#[==[hello
|
|
|
|
world]==]`` and the empty string for ``#[[hello world]]``).
|
|
|
|
``HyString``\s that are not produced by bracket strings have their
|
|
|
|
``brackets`` set to ``None``.
|
|
|
|
|
2017-02-19 01:15:58 +01:00
|
|
|
HyBytes
|
|
|
|
~~~~~~~
|
|
|
|
|
|
|
|
``hy.models.HyBytes`` is like ``HyString``, but for sequences of bytes.
|
2019-05-23 19:20:44 +02:00
|
|
|
It inherits from ``bytes``.
|
2017-02-19 01:15:58 +01:00
|
|
|
|
2014-01-02 16:27:32 +01:00
|
|
|
.. _hy_numeric_models:
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Numeric Models
|
2014-01-02 16:27:32 +01:00
|
|
|
~~~~~~~~~~~~~~
|
|
|
|
|
2019-05-23 19:20:44 +02:00
|
|
|
``hy.models.HyInteger`` represents integer literals, using the ``int``
|
|
|
|
type.
|
2014-01-02 16:27:32 +01:00
|
|
|
|
2017-02-17 04:43:00 +01:00
|
|
|
``hy.models.HyFloat`` represents floating-point literals.
|
2014-01-02 16:27:32 +01:00
|
|
|
|
2017-02-17 04:43:00 +01:00
|
|
|
``hy.models.HyComplex`` represents complex literals.
|
2014-01-02 16:27:32 +01:00
|
|
|
|
|
|
|
Numeric models are parsed using the corresponding Python routine, and
|
|
|
|
valid numeric python literals will be turned into their Hy counterpart.
|
|
|
|
|
|
|
|
.. _hysymbol:
|
|
|
|
|
|
|
|
HySymbol
|
|
|
|
~~~~~~~~
|
|
|
|
|
2018-04-23 19:52:22 +02:00
|
|
|
``hy.models.HySymbol`` is the model used to represent symbols in the Hy
|
|
|
|
language. Like ``HyString``, it inherits from ``str`` (or ``unicode`` on Python
|
|
|
|
2).
|
2014-01-02 16:27:32 +01:00
|
|
|
|
2018-03-05 01:39:54 +01:00
|
|
|
Symbols are :ref:`mangled <mangling>` when they are compiled
|
|
|
|
to Python variable names.
|
2014-01-02 16:27:32 +01:00
|
|
|
|
|
|
|
.. _hykeyword:
|
|
|
|
|
|
|
|
HyKeyword
|
|
|
|
~~~~~~~~~
|
|
|
|
|
2017-02-17 04:43:00 +01:00
|
|
|
``hy.models.HyKeyword`` represents keywords in Hy. Keywords are
|
2017-03-30 21:30:00 +02:00
|
|
|
symbols starting with a ``:``. See :ref:`syntax-keywords`.
|
2014-01-02 16:27:32 +01:00
|
|
|
|
2013-12-30 23:32:57 +01:00
|
|
|
Hy Internal Theory
|
|
|
|
==================
|
|
|
|
|
|
|
|
.. _overview:
|
|
|
|
|
|
|
|
Overview
|
|
|
|
--------
|
|
|
|
|
2014-01-02 18:09:33 +01:00
|
|
|
The Hy internals work by acting as a front-end to Python bytecode, so
|
|
|
|
that Hy itself compiles down to Python Bytecode, allowing an unmodified
|
|
|
|
Python runtime to run Hy code, without even noticing it.
|
|
|
|
|
|
|
|
The way we do this is by translating Hy into an internal Python AST
|
|
|
|
datastructure, and building that AST down into Python bytecode using
|
|
|
|
modules from the Python standard library, so that we don't have to
|
|
|
|
duplicate all the work of the Python internals for every single Python
|
2013-12-30 23:32:57 +01:00
|
|
|
release.
|
|
|
|
|
|
|
|
Hy works in four stages. The following sections will cover each step of Hy
|
|
|
|
from source to runtime.
|
|
|
|
|
|
|
|
.. _lexing:
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Steps 1 and 2: Tokenizing and Parsing
|
2014-01-02 18:09:33 +01:00
|
|
|
-------------------------------------
|
2013-12-30 23:32:57 +01:00
|
|
|
|
2014-02-24 17:12:36 +01:00
|
|
|
The first stage of compiling Hy is to lex the source into tokens that we can
|
2013-12-30 23:32:57 +01:00
|
|
|
deal with. We use a project called rply, which is a really nice (and fast)
|
2013-12-31 17:26:31 +01:00
|
|
|
parser, written in a subset of Python called rpython.
|
2013-12-30 23:32:57 +01:00
|
|
|
|
|
|
|
The lexing code is all defined in ``hy.lex.lexer``. This code is mostly just
|
2014-02-24 17:12:36 +01:00
|
|
|
defining the Hy grammar, and all the actual hard parts are taken care of by
|
|
|
|
rply -- we just define "callbacks" for rply in ``hy.lex.parser``, which takes
|
|
|
|
the tokens generated, and returns the Hy models.
|
2013-12-30 23:32:57 +01:00
|
|
|
|
|
|
|
You can think of the Hy models as the "AST" for Hy, it's what Macros operate
|
|
|
|
on (directly), and it's what the compiler uses when it compiles Hy down.
|
|
|
|
|
2014-01-02 16:27:32 +01:00
|
|
|
.. seealso::
|
2013-12-30 23:32:57 +01:00
|
|
|
|
2014-01-02 16:27:32 +01:00
|
|
|
Section :ref:`models` for more information on Hy models and what they mean.
|
2013-12-30 23:32:57 +01:00
|
|
|
|
|
|
|
.. _compiling:
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Step 3: Hy Compilation to Python AST
|
2014-01-02 18:09:33 +01:00
|
|
|
------------------------------------
|
2013-12-30 23:32:57 +01:00
|
|
|
|
|
|
|
This is where most of the magic in Hy happens. This is where we take Hy AST
|
|
|
|
(the models), and compile them into Python AST. A couple of funky things happen
|
|
|
|
here to work past a few problems in AST, and working in the compiler is some
|
|
|
|
of the most important work we do have.
|
|
|
|
|
|
|
|
The compiler is a bit complex, so don't feel bad if you don't grok it on the
|
|
|
|
first shot, it may take a bit of time to get right.
|
|
|
|
|
|
|
|
The main entry-point to the Compiler is ``HyASTCompiler.compile``. This method
|
|
|
|
is invoked, and the only real "public" method on the class (that is to say,
|
|
|
|
we don't really promise the API beyond that method).
|
|
|
|
|
|
|
|
In fact, even internally, we don't recurse directly hardly ever, we almost
|
|
|
|
always force the Hy tree through ``compile``, and will often do this with
|
|
|
|
sub-elements of an expression that we have. It's up to the Type-based dispatcher
|
|
|
|
to properly dispatch sub-elements.
|
|
|
|
|
|
|
|
All methods that preform a compilation are marked with the ``@builds()``
|
|
|
|
decorator. You can either pass the class of the Hy model that it compiles,
|
|
|
|
or you can use a string for expressions. I'll clear this up in a second.
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
First Stage Type-Dispatch
|
2013-12-30 23:32:57 +01:00
|
|
|
~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
|
|
|
|
|
|
Let's start in the ``compile`` method. The first thing we do is check the
|
|
|
|
Type of the thing we're building. We look up to see if we have a method that
|
|
|
|
can build the ``type()`` that we have, and dispatch to the method that can
|
|
|
|
handle it. If we don't have any methods that can build that type, we raise
|
|
|
|
an internal ``Exception``.
|
|
|
|
|
|
|
|
For instance, if we have a ``HyString``, we have an almost 1-to-1 mapping of
|
|
|
|
Hy AST to Python AST. The ``compile_string`` method takes the ``HyString``, and
|
|
|
|
returns an ``ast.Str()`` that's populated with the correct line-numbers and
|
|
|
|
content.
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Macro-Expand
|
2013-12-30 23:32:57 +01:00
|
|
|
~~~~~~~~~~~~
|
|
|
|
|
|
|
|
If we get a ``HyExpression``, we'll attempt to see if this is a known
|
|
|
|
Macro, and push to have it expanded by invoking ``hy.macros.macroexpand``, then
|
|
|
|
push the result back into ``HyASTCompiler.compile``.
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Second Stage Expression-Dispatch
|
2013-12-30 23:32:57 +01:00
|
|
|
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
|
|
|
|
|
|
The only special case is the ``HyExpression``, since we need to create different
|
|
|
|
AST depending on the special form in question. For instance, when we hit an
|
2016-11-24 03:35:17 +01:00
|
|
|
``(if True True False)``, we need to generate a ``ast.If``, and properly
|
2013-12-30 23:32:57 +01:00
|
|
|
compile the sub-nodes. This is where the ``@builds()`` with a String as an
|
|
|
|
argument comes in.
|
|
|
|
|
|
|
|
For the ``compile_expression`` (which is defined with an
|
|
|
|
``@builds(HyExpression)``) will dispatch based on the string of the first
|
|
|
|
argument. If, for some reason, the first argument is not a string, it will
|
|
|
|
properly handle that case as well (most likely by raising an ``Exception``).
|
|
|
|
|
|
|
|
If the String isn't known to Hy, it will default to create an ``ast.Call``,
|
|
|
|
which will try to do a runtime call (in Python, something like ``foo()``).
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Issues Hit with Python AST
|
2013-12-30 23:32:57 +01:00
|
|
|
~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
|
|
|
|
|
|
Python AST is great; it's what's enabled us to write such a powerful project
|
|
|
|
on top of Python without having to fight Python too hard. Like anything, we've
|
|
|
|
had our fair share of issues, and here's a short list of the common ones you
|
|
|
|
might run into.
|
|
|
|
|
|
|
|
*Python differentiates between Statements and Expressions*.
|
|
|
|
|
|
|
|
This might not sound like a big deal -- in fact, to most Python programmers,
|
|
|
|
this will shortly become a "Well, yeah" moment.
|
|
|
|
|
|
|
|
In Python, doing something like:
|
|
|
|
|
|
|
|
``print for x in range(10): pass``, because ``print`` prints expressions, and
|
|
|
|
``for`` isn't an expression, it's a control flow statement. Things like
|
|
|
|
``1 + 1`` are Expressions, as is ``lambda x: 1 + x``, but other language
|
|
|
|
features, such as ``if``, ``for``, or ``while`` are statements.
|
|
|
|
|
|
|
|
Since they have no "value" to Python, this makes working in Hy hard, since
|
2016-11-24 03:35:17 +01:00
|
|
|
doing something like ``(print (if True True False))`` is not just common, it's
|
2013-12-30 23:32:57 +01:00
|
|
|
expected.
|
|
|
|
|
2018-03-05 01:39:54 +01:00
|
|
|
As a result, we reconfigure things using a ``Result`` object, where we offer
|
2013-12-30 23:32:57 +01:00
|
|
|
up any ``ast.stmt`` that need to get run, and a single ``ast.expr`` that can
|
|
|
|
be used to get the value of whatever was just run. Hy does this by forcing
|
|
|
|
assignment to things while running.
|
|
|
|
|
|
|
|
As example, the Hy::
|
|
|
|
|
2016-11-24 03:35:17 +01:00
|
|
|
(print (if True True False))
|
2013-12-30 23:32:57 +01:00
|
|
|
|
|
|
|
Will turn into::
|
|
|
|
|
|
|
|
if True:
|
2018-03-05 01:39:54 +01:00
|
|
|
_temp_name_here = True
|
2013-12-30 23:32:57 +01:00
|
|
|
else:
|
2018-03-05 01:39:54 +01:00
|
|
|
_temp_name_here = False
|
2013-12-30 23:32:57 +01:00
|
|
|
|
2018-05-16 08:36:15 +02:00
|
|
|
print(_temp_name_here)
|
2013-12-30 23:32:57 +01:00
|
|
|
|
|
|
|
|
|
|
|
OK, that was a bit of a lie, since we actually turn that statement
|
|
|
|
into::
|
|
|
|
|
2018-05-16 08:36:15 +02:00
|
|
|
print(True if True else False)
|
2013-12-30 23:32:57 +01:00
|
|
|
|
|
|
|
By forcing things into an ``ast.expr`` if we can, but the general idea holds.
|
|
|
|
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Step 4: Python Bytecode Output and Runtime
|
2014-01-02 18:09:33 +01:00
|
|
|
------------------------------------------
|
2013-12-30 23:32:57 +01:00
|
|
|
|
|
|
|
After we have a Python AST tree that's complete, we can try and compile it to
|
|
|
|
Python bytecode by pushing it through ``eval``. From here on out, we're no
|
|
|
|
longer in control, and Python is taking care of everything. This is why things
|
|
|
|
like Python tracebacks, pdb and django apps work.
|
|
|
|
|
|
|
|
|
2013-04-07 17:35:10 +02:00
|
|
|
Hy Macros
|
|
|
|
=========
|
|
|
|
|
2013-12-30 22:42:55 +01:00
|
|
|
.. _using-gensym:
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Using gensym for Safer Macros
|
|
|
|
-----------------------------
|
2013-12-30 22:42:55 +01:00
|
|
|
|
|
|
|
When writing macros, one must be careful to avoid capturing external variables
|
|
|
|
or using variable names that might conflict with user code.
|
|
|
|
|
|
|
|
We will use an example macro ``nif`` (see http://letoverlambda.com/index.cl/guest/chap3.html#sec_5
|
|
|
|
for a more complete description.) ``nif`` is an example, something like a numeric ``if``,
|
|
|
|
where based on the expression, one of the 3 forms is called depending on if the
|
|
|
|
expression is positive, zero or negative.
|
|
|
|
|
2014-05-05 20:17:14 +02:00
|
|
|
A first pass might be something like:
|
2013-12-30 22:42:55 +01:00
|
|
|
|
2014-03-14 14:01:47 +01:00
|
|
|
.. code-block:: hy
|
2013-12-30 22:42:55 +01:00
|
|
|
|
|
|
|
(defmacro nif [expr pos-form zero-form neg-form]
|
2017-02-09 20:33:09 +01:00
|
|
|
`(do
|
|
|
|
(setv obscure-name ~expr)
|
2013-12-30 22:42:55 +01:00
|
|
|
(cond [(pos? obscure-name) ~pos-form]
|
|
|
|
[(zero? obscure-name) ~zero-form]
|
|
|
|
[(neg? obscure-name) ~neg-form])))
|
|
|
|
|
2016-01-22 20:21:38 +01:00
|
|
|
where ``obscure-name`` is an attempt to pick some variable name as not to
|
2013-12-30 22:42:55 +01:00
|
|
|
conflict with other code. But of course, while well-intentioned,
|
|
|
|
this is no guarantee.
|
|
|
|
|
|
|
|
The method :ref:`gensym` is designed to generate a new, unique symbol for just
|
|
|
|
such an occasion. A much better version of ``nif`` would be:
|
|
|
|
|
2014-03-14 14:01:47 +01:00
|
|
|
.. code-block:: hy
|
2013-12-30 22:42:55 +01:00
|
|
|
|
|
|
|
(defmacro nif [expr pos-form zero-form neg-form]
|
2017-02-09 20:33:09 +01:00
|
|
|
(setv g (gensym))
|
|
|
|
`(do
|
|
|
|
(setv ~g ~expr)
|
|
|
|
(cond [(pos? ~g) ~pos-form]
|
|
|
|
[(zero? ~g) ~zero-form]
|
|
|
|
[(neg? ~g) ~neg-form])))
|
2013-12-30 22:42:55 +01:00
|
|
|
|
|
|
|
This is an easy case, since there is only one symbol. But if there is
|
|
|
|
a need for several gensym's there is a second macro :ref:`with-gensyms` that
|
2017-02-09 20:33:09 +01:00
|
|
|
basically expands to a ``setv`` form:
|
2013-12-30 22:42:55 +01:00
|
|
|
|
2014-03-14 14:01:47 +01:00
|
|
|
.. code-block:: hy
|
2013-12-30 22:42:55 +01:00
|
|
|
|
|
|
|
(with-gensyms [a b c]
|
|
|
|
...)
|
|
|
|
|
|
|
|
expands to:
|
|
|
|
|
2014-03-14 14:01:47 +01:00
|
|
|
.. code-block:: hy
|
2013-12-30 22:42:55 +01:00
|
|
|
|
2017-02-09 20:33:09 +01:00
|
|
|
(do
|
|
|
|
(setv a (gensym)
|
|
|
|
b (gensym)
|
|
|
|
c (gensym))
|
2013-12-30 22:42:55 +01:00
|
|
|
...)
|
|
|
|
|
|
|
|
so our re-written ``nif`` would look like:
|
|
|
|
|
2014-03-14 14:01:47 +01:00
|
|
|
.. code-block:: hy
|
2013-12-30 22:42:55 +01:00
|
|
|
|
|
|
|
(defmacro nif [expr pos-form zero-form neg-form]
|
|
|
|
(with-gensyms [g]
|
2018-05-16 08:36:15 +02:00
|
|
|
`(do
|
|
|
|
(setv ~g ~expr)
|
|
|
|
(cond [(pos? ~g) ~pos-form]
|
|
|
|
[(zero? ~g) ~zero-form]
|
|
|
|
[(neg? ~g) ~neg-form]))))
|
2013-12-30 22:42:55 +01:00
|
|
|
|
2014-01-02 15:50:42 +01:00
|
|
|
Finally, though we can make a new macro that does all this for us. :ref:`defmacro/g!`
|
2013-12-30 22:42:55 +01:00
|
|
|
will take all symbols that begin with ``g!`` and automatically call ``gensym`` with the
|
|
|
|
remainder of the symbol. So ``g!a`` would become ``(gensym "a")``.
|
|
|
|
|
|
|
|
Our final version of ``nif``, built with ``defmacro/g!`` becomes:
|
|
|
|
|
2014-03-14 14:01:47 +01:00
|
|
|
.. code-block:: hy
|
2013-12-30 22:42:55 +01:00
|
|
|
|
|
|
|
(defmacro/g! nif [expr pos-form zero-form neg-form]
|
2017-02-09 20:33:09 +01:00
|
|
|
`(do
|
|
|
|
(setv ~g!res ~expr)
|
2013-12-30 22:42:55 +01:00
|
|
|
(cond [(pos? ~g!res) ~pos-form]
|
|
|
|
[(zero? ~g!res) ~zero-form]
|
2017-02-09 20:33:09 +01:00
|
|
|
[(neg? ~g!res) ~neg-form])))
|
2013-12-30 22:42:55 +01:00
|
|
|
|
|
|
|
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Checking Macro Arguments and Raising Exceptions
|
2013-12-30 22:42:55 +01:00
|
|
|
-----------------------------------------------
|
|
|
|
|
2013-04-07 17:35:10 +02:00
|
|
|
|
|
|
|
|
2014-12-06 21:28:28 +01:00
|
|
|
Hy Compiler Built-Ins
|
|
|
|
=====================
|
2013-04-07 17:35:10 +02:00
|
|
|
|
2017-05-15 23:16:17 +02:00
|
|
|
.. TODO: Write this.
|