/* include/nock.h
**
** This file is in the public domain.
*/
  /** Functions.
  **/
    /* u2_nk_nock():
    **
    **   Compute `(nock bus fol)`.
    */
      u2_weak                                                     //  transfer
      u2_nk_nock(u2_wire wir_r,
                 u2_weak bus,                                     //  transfer
                 u2_weak fol);                                    //  retain

    /* u2_nk_soft():
    **
    **   Compute `(nock bus fol)`, interpreter first.
    */
      u2_weak                                                     //  transfer
      u2_nk_soft(u2_wire wir_r,
                 u2_weak bus,                                     //  transfer
                 u2_weak fol);                                    //  retain

    /* u2_nk_nold():
    **
    **   Really compute `(nock bus fol)`, interpreter first.
    */
      u2_weak                                                     //  transfer
      u2_nk_nold(u2_wire wir_r,
                 u2_weak bus,                                     //  transfer
                 u2_weak fol);                                    //  retain

    /* u2_nk_mong():
    **
    **   Compute `(nock gat(-> sam) +.gat)` - new calling convention.
    */
      u2_weak                                                     //  transfer
      u2_nk_mong(u2_wire wir_r,
                 u2_weak gat,                                     //  retain
                 u2_weak sam);                                    //  transfer

    /* u2_nk_kick():
    **
    **   Fire `gat` without changing the sample.
    */
      u2_weak                                                     //  transfer
      u2_nk_kick(u2_wire wir_r,
                 u2_weak gat);                                    //  retain