mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-09-19 22:48:03 +03:00
Just a stash.
This commit is contained in:
C. Guy Yarvin
parent
ef29b9968c
commit
c67a1e5c51
2
Makefile
2
Makefile
@ -330,7 +330,7 @@ $(BIN)/vere: $(LIBCRE) $(VERE_OFILES) $(LIBUV) $(LIBRE2) $(LIBED25519) $(BPT_O)
|
||||
|
||||
meme: $(BIN)/meme
|
||||
|
||||
$(BIN)/meme: f/meme.o
|
||||
$(BIN)/meme: f/meme.o $(J164_OFILES)
|
||||
$(CC) -g $< -lgmp -o $@
|
||||
|
||||
tags:
|
||||
|
||||
63
f/meme.c
63
f/meme.c
@ -3,6 +3,24 @@
|
||||
** This file is in the public domain.
|
||||
*/
|
||||
#define C3_GLOBAL
|
||||
|
||||
// delete me
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <fcntl.h>
|
||||
#include <sys/ioctl.h>
|
||||
#include <sys/stat.h>
|
||||
#include <unistd.h>
|
||||
#include <setjmp.h>
|
||||
#include <gmp.h>
|
||||
#include <dirent.h>
|
||||
#include <stdint.h>
|
||||
#include <uv.h>
|
||||
#include <curses.h>
|
||||
#include <termios.h>
|
||||
#include <term.h>
|
||||
#include <errno.h>
|
||||
|
||||
#include "f/meme.h"
|
||||
|
||||
/* _boot_north(): install a north road.
|
||||
@ -149,6 +167,7 @@ _road_dump(void)
|
||||
hat_w, fre_w, (hat_w - fre_w));
|
||||
}
|
||||
|
||||
#if 0
|
||||
static void
|
||||
_road_sane(void)
|
||||
{
|
||||
@ -172,6 +191,7 @@ _road_sane(void)
|
||||
}
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
/* u2_cm_bail(): bail out. Does not return.
|
||||
**
|
||||
@ -466,6 +486,7 @@ u2_ca_free(void* tox_v)
|
||||
if ( 0 != box_u->use_w ) return;
|
||||
|
||||
c3_assert(u2_yes == u2_co_is_north);
|
||||
#if 0
|
||||
/* Clear the contents of the block, for debugging.
|
||||
*/
|
||||
{
|
||||
@ -475,6 +496,7 @@ u2_ca_free(void* tox_v)
|
||||
box_w[i_w] = 0xdeadbeef;
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
if ( u2_yes == u2_co_is_north ) {
|
||||
/* Try to coalesce with the block below.
|
||||
@ -2780,6 +2802,7 @@ u2_cr_tape(u2_noun a)
|
||||
return a_y;
|
||||
}
|
||||
|
||||
#if 0
|
||||
static c3_w*
|
||||
_test_walloc(c3_w siz_w)
|
||||
{
|
||||
@ -2858,6 +2881,41 @@ test(void)
|
||||
|
||||
printf("allocations %d, iterations %d\n", ALL_w, ITE_w);
|
||||
}
|
||||
#endif
|
||||
|
||||
#if 0
|
||||
/* u2_walk_load(): load file or bail.
|
||||
*/
|
||||
static u2_noun
|
||||
u2_walk_load(c3_c* pas_c)
|
||||
{
|
||||
struct stat buf_b;
|
||||
c3_i fid_i = open(pas_c, O_RDONLY, 0644);
|
||||
c3_w fln_w, red_w;
|
||||
c3_y* pad_y;
|
||||
|
||||
if ( (fid_i < 0) || (fstat(fid_i, &buf_b) < 0) ) {
|
||||
fprintf(stderr, "%s: %s\r\n", pas_c, strerror(errno));
|
||||
return u2_cm_bail(c3__fail);
|
||||
}
|
||||
fln_w = buf_b.st_size;
|
||||
pad_y = c3_malloc(buf_b.st_size);
|
||||
|
||||
red_w = read(fid_i, pad_y, fln_w);
|
||||
close(fid_i);
|
||||
|
||||
if ( fln_w != red_w ) {
|
||||
free(pad_y);
|
||||
return u2_cm_bail(c3__fail);
|
||||
}
|
||||
else {
|
||||
u2_noun pad = u2_ci_bytes(fln_w, (c3_y *)pad_y);
|
||||
free(pad_y);
|
||||
|
||||
return pad;
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
// A simple memory tester.
|
||||
//
|
||||
@ -2870,7 +2928,12 @@ main(int argc, char *argv[])
|
||||
u2_cm_boot(U2_OS_LoomBase, (1 << U2_OS_LoomBits));
|
||||
printf("booted.\n");
|
||||
|
||||
#if 0
|
||||
_road_dump();
|
||||
test();
|
||||
_road_dump();
|
||||
{
|
||||
u2_noun pil = u2_walk_load("urb/urbit.pill");
|
||||
}
|
||||
#endif
|
||||
}
|
||||
|
||||
250
gen164/pit.h
250
gen164/pit.h
@ -72,374 +72,372 @@
|
||||
/** Tier 1.
|
||||
**/
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, add)(u2_wire wir_r,
|
||||
j2_mbc(Pt1, add)(u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, dec)(u2_atom a); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, div)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, dec)(u2_wire wir_r,
|
||||
j2_mbc(Pt1, gte)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, gth)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, inc)(
|
||||
u2_atom a); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, div)(u2_wire wir_r,
|
||||
j2_mbc(Pt1, lte)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, gte)(u2_wire wir_r,
|
||||
j2_mbc(Pt1, lth)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, gth)(u2_wire wir_r,
|
||||
j2_mbc(Pt1, mul)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, inc)(u2_wire wir_r,
|
||||
u2_atom a); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, lte)(u2_wire wir_r,
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, lth)(u2_wire wir_r,
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, mul)(u2_wire wir_r,
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt1, sub)(u2_wire wir_r,
|
||||
j2_mbc(Pt1, sub)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
/** Tier 2.
|
||||
**/
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, bind)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, bind)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, clap)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, clap)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b, // retain
|
||||
u2_noun c); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, drop)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, drop)(
|
||||
u2_noun a); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, flop)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, flop)(
|
||||
u2_noun a); // retain
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, lent)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, lent)(
|
||||
u2_noun a); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, levy)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, levy)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, lien)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, lien)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, need)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, need)(
|
||||
u2_noun a); // retain
|
||||
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, reel)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, reel)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, roll)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, roll)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, skim)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, skim)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, skip)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, skip)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, snag)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, snag)(
|
||||
u2_atom a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, sort)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, sort)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, turn)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, turn)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt2, weld)(u2_wire wir_r,
|
||||
j2_mbc(Pt2, weld)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
/** Tier 3.
|
||||
**/
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, bex)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, bex)(
|
||||
u2_atom a); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mbc(Pt3, can)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, can)(
|
||||
u2_atom a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, cap)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, cap)(
|
||||
u2_atom a); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, cat)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, cat)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b, // retain
|
||||
u2_atom c); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, con)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, con)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, cut)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, cut)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b, // retain
|
||||
u2_atom c, // retain
|
||||
u2_atom d); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, dor)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, dor)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, dis)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, dis)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, end)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, end)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b, // retain
|
||||
u2_atom c); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, gor)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, gor)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, hor)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, hor)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, lsh)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, lsh)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b, // retain
|
||||
u2_atom c); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, mas)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, mas)(
|
||||
u2_atom a); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, met)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, met)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, mix)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, mix)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, peg)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, peg)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, rap)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, rap)(
|
||||
u2_atom a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, rip)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, rip)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, rsh)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, rsh)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b, // retain
|
||||
u2_atom c); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mbc(Pt3, vor)(u2_wire wir_r,
|
||||
j2_mbc(Pt3, vor)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
/** Tier 4.
|
||||
**/
|
||||
u2_weak // transfer
|
||||
j2_mcc(Pt4, in, gas)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, in, gas)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_bean
|
||||
j2_mcc(Pt4, in, has)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, in, has)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mcc(Pt4, in, int)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, in, int)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mcc(Pt4, in, put)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, in, put)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mcc(Pt4, in, tap)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, in, tap)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mcc(Pt4, in, uni)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, in, uni)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcc(Pt4, by, get)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, by, get)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mcc(Pt4, by, gas)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, by, gas)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mcc(Pt4, by, int)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, by, int)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mcc(Pt4, by, put)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, by, put)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b, // retain
|
||||
u2_noun c); // retain
|
||||
|
||||
u2_weak // transfer
|
||||
j2_mcc(Pt4, by, uni)(u2_wire wir_r,
|
||||
j2_mcc(Pt4, by, uni)(
|
||||
u2_noun a, // retain
|
||||
u2_noun b); // retain
|
||||
|
||||
/** Tier 5.
|
||||
**/
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt5, cue)(u2_wire wir_r,
|
||||
j2_mby(Pt5, cue)(
|
||||
u2_atom a); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt5, jam)(u2_wire wir_r,
|
||||
j2_mby(Pt5, jam)(
|
||||
u2_atom a); // retain
|
||||
|
||||
u2_noun // produce
|
||||
j2_mby(Pt5, mat)(u2_wire wir_r,
|
||||
j2_mby(Pt5, mat)(
|
||||
u2_atom a); // retain
|
||||
|
||||
u2_noun // produce
|
||||
j2_mby(Pt5, rub)(u2_wire wir_r,
|
||||
j2_mby(Pt5, rub)(
|
||||
u2_atom a, // retain
|
||||
u2_atom b); // retain
|
||||
|
||||
/** Tier 6.
|
||||
**/
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, bull)(u2_wire wir_r,
|
||||
j2_mby(Pt6, bull)(
|
||||
u2_noun bid, // retain
|
||||
u2_noun der); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, cell)(u2_wire wir_r,
|
||||
j2_mby(Pt6, cell)(
|
||||
u2_noun hed, // retain
|
||||
u2_noun tal); // retain
|
||||
u2_noun // transfer
|
||||
j2_mbc(Pt6, comb)(u2_wire wir_r,
|
||||
j2_mbc(Pt6, comb)(
|
||||
u2_noun mal, // retain
|
||||
u2_noun buz); // retain
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, cons)(u2_wire wir_r,
|
||||
j2_mby(Pt6, cons)(
|
||||
u2_noun vur, // retain
|
||||
u2_noun sed); // retain
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, core)(u2_wire wir_r,
|
||||
j2_mby(Pt6, core)(
|
||||
u2_noun pac, // retain
|
||||
u2_noun con); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, cube)(u2_wire wir_r,
|
||||
j2_mby(Pt6, cube)(
|
||||
u2_noun dil, // retain
|
||||
u2_noun goq); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, face)(u2_wire wir_r,
|
||||
j2_mby(Pt6, face)(
|
||||
u2_noun cog, // retain
|
||||
u2_noun tip); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, fine)(u2_wire wir_r,
|
||||
j2_mby(Pt6, fine)(
|
||||
u2_noun fuv, // retain
|
||||
u2_noun lup, // retain
|
||||
u2_noun mar); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, fitz)(u2_wire wir_r,
|
||||
j2_mby(Pt6, fitz)(
|
||||
u2_noun yaz, // retain
|
||||
u2_noun wix); // retain
|
||||
|
||||
u2_noun // produce
|
||||
j2_mby(Pt6, flay)(u2_wire wir_r,
|
||||
j2_mby(Pt6, flay)(
|
||||
u2_noun pok); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, fork)(u2_wire wir_r,
|
||||
j2_mby(Pt6, fork)(
|
||||
u2_noun hoz, // retain
|
||||
u2_noun bur); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, flip)(u2_wire wir_r,
|
||||
j2_mby(Pt6, flip)(
|
||||
u2_noun hel); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, flor)(u2_wire wir_r,
|
||||
j2_mby(Pt6, flor)(
|
||||
u2_noun bos, // retain
|
||||
u2_noun nif); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, flan)(u2_wire wir_r,
|
||||
j2_mby(Pt6, flan)(
|
||||
u2_noun bos, // retain
|
||||
u2_noun nif); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, heal)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, heal)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun qog, // retain
|
||||
@ -447,76 +445,76 @@
|
||||
u2_noun ref); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, hike)(u2_wire wir_r,
|
||||
j2_mby(Pt6, hike)(
|
||||
u2_noun axe, // retain
|
||||
u2_noun pac); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mby(Pt6, look)(u2_wire wir_r,
|
||||
j2_mby(Pt6, look)(
|
||||
u2_noun cog, // retain
|
||||
u2_noun dab); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ap, hack)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ap, hack)(
|
||||
u2_noun ter, // retain
|
||||
u2_noun gen); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ap, open)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ap, open)(
|
||||
u2_noun ter, // retain
|
||||
u2_noun gen); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, al, bunt)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, al, bunt)(
|
||||
u2_noun van, // retain
|
||||
u2_noun gen); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, al, whip)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, al, whip)(
|
||||
u2_noun van, // retain
|
||||
u2_noun gen, // retain
|
||||
u2_noun axe); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ap, rake)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ap, rake)(
|
||||
u2_noun gen); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ap, late)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ap, late)(
|
||||
u2_noun gen); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, burn)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, burn)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, busk)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, busk)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun cog, // retain
|
||||
u2_noun hyp); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, bust)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, bust)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun dib); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, conk)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, conk)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun got); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, crop)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, crop)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun ref); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, cull)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, cull)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_bean pol, // retain
|
||||
@ -524,7 +522,7 @@
|
||||
u2_noun ref); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, find)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, find)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun dep, // retain
|
||||
@ -532,7 +530,7 @@
|
||||
u2_noun cog); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, fond)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, fond)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun dep, // retain
|
||||
@ -540,7 +538,7 @@
|
||||
u2_noun cog); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, fink)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, fink)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun dep, // retain
|
||||
@ -548,50 +546,50 @@
|
||||
u2_noun cog); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, fire)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, fire)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun hag); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, firm)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, firm)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun gib); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, fish)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, fish)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_atom axe); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, fuse)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, fuse)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun ref); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, gain)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, gain)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun gen); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, lose)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, lose)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun gen); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, mint)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, mint)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun gol, // retain
|
||||
u2_noun gen); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, mull)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, mull)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun gol, // retain
|
||||
@ -599,77 +597,77 @@
|
||||
u2_noun gen); // retain
|
||||
|
||||
u2_bean // transfer
|
||||
j2_mcy(Pt6, ut, nest)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, nest)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_bean tel, // retain
|
||||
u2_noun ref); // retain
|
||||
|
||||
u2_bean // transfer
|
||||
j2_mcy(Pt6, ut, orth)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, orth)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun ref); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, park)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, park)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun way, // retain
|
||||
u2_noun axe); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, peek)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, peek)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun way, // retain
|
||||
u2_noun axe); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, play)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, play)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun gen); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, repo)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, repo)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, rest)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, rest)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun leg); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, seek)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, seek)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun way,
|
||||
u2_noun hep); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, seep)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, seep)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun way,
|
||||
u2_noun hep); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, sift)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, sift)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun ref); // retain
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, tack)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, tack)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun peh, // retain
|
||||
u2_noun mur); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, tock)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, tock)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun peh, // retain
|
||||
@ -677,13 +675,13 @@
|
||||
u2_noun men); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, snub)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, snub)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun har); // retain
|
||||
|
||||
u2_noun // transfer
|
||||
j2_mcy(Pt6, ut, wrap)(u2_wire wir_r,
|
||||
j2_mcy(Pt6, ut, wrap)(
|
||||
u2_noun van, // retain
|
||||
u2_noun sut, // retain
|
||||
u2_noun yoz); // retain
|
||||
|
||||
@ -74,6 +74,22 @@
|
||||
# define u2_ax_peg(a_w, b_w) \
|
||||
( (a_w << u2_ax_dep(b_w)) | (b_w &~ (1 << u2_ax_dep(b_w))) )
|
||||
|
||||
/** Aliases - selective and syntactically unique.
|
||||
**/
|
||||
# define u2h(som) u2_cx_h(som)
|
||||
# define u2t(som) u2_cx_t(som)
|
||||
# define u2at(axe, som) u2_cx_at(axe, som)
|
||||
|
||||
# define u2nc(a, b) u2_cn_cell(a, b)
|
||||
# define u2nt(a, b, c) u2_cn_trel(a, b, c)
|
||||
# define u2nq(a, b, c, d) u2_cn_qual(a, b, c, d)
|
||||
|
||||
# define u2du(som) (u2_cr_du(som))
|
||||
# define u2ud(som) (u2_cr_ud(som))
|
||||
|
||||
# define u2k(som) u2_ca_gain(som)
|
||||
# define u2z(som) u2_ca_lose(som)
|
||||
|
||||
|
||||
/** Tuning and configuration.
|
||||
**/
|
||||
|
||||
Loading…
Reference in New Issue
Block a user