Comment out old macro jets in ++ap; reenable fond jet

This commit is contained in:
C. Guy Yarvin 2017-12-18 11:53:00 -08:00
parent 0df247f9a2
commit 8fb09d2690
3 changed files with 9 additions and 5 deletions

View File

@ -91,7 +91,7 @@ endif
INCLUDE=include
MDEFINES=-DU3_OS_$(OS) -DU3_OS_ENDIAN_$(ENDIAN)
DEBUG=yes
DEBUG=no
ifeq ($(DEBUG),yes)
CFLAGS=-g

View File

@ -19,9 +19,9 @@
# define _ap_jet_rake 1
# define _ap_jet_hack 2
#if 0
static u3_noun
_open_in(u3_noun ter, u3_noun gen);
#if 0
/* ~(. al gen)
*/
static u3_noun
@ -32,7 +32,6 @@
return u3i_molt(gat, u3x_sam, u3nc(c3__herb, u3k(gen)), 0);
}
#endif
/* ~(. al gen)
*/
static u3_noun
@ -984,6 +983,7 @@
return u3qfp_hack(ter, gen);
}
}
#endif
/* boilerplate
*/
@ -1010,6 +1010,7 @@
_ap_open_l(u3_noun ter,
u3_noun gen)
{
#if 0
u3_noun pro = _open_in(ter, gen);
if ( u3_none != pro ) {
@ -1017,6 +1018,9 @@
} else {
return _ap_open_n(ter, gen);
}
#else
return _ap_open_n(ter, gen);
#endif
}
u3_noun

View File

@ -120,7 +120,7 @@ static u3j_core _143_hex_d[] =
static u3j_harm _143_pen__ut_conk_a[] = {{".2", u3wfu_conk}, {}};
static u3j_harm _143_pen__ut_crop_a[] = {{".2", u3wfu_crop}, {}};
// static u3j_harm _143_pen__ut_fire_a[] = {{".2", u3wfu_fire}, {}};
// static u3j_harm _143_pen__ut_fond_a[] = {{".2", u3wfu_fond}, {}};
static u3j_harm _143_pen__ut_fond_a[] = {{".2", u3wfu_fond}, {}};
static u3j_harm _143_pen__ut_fish_a[] = {{".2", u3wfu_fish}, {}};
static u3j_harm _143_pen__ut_fuse_a[] = {{".2", u3wfu_fuse}, {}};
static u3j_harm _143_pen__ut_mint_a[] = {{".2", u3wfu_mint}, {}};
@ -136,7 +136,7 @@ static u3j_core _143_hex_d[] =
{ "burn", _143_pen__ut_burn_a },
{ "conk", _143_pen__ut_conk_a },
{ "crop", _143_pen__ut_crop_a },
// { "fond", _143_pen__ut_fond_a },
{ "fond", _143_pen__ut_fond_a },
// { "fire", _143_pen__ut_fire_a },
{ "fish", _143_pen__ut_fish_a },
{ "fuse", _143_pen__ut_fuse_a },