implements -J for specifying a custom ivory pill

This commit is contained in:
Joe Bryan 2018-11-20 22:53:46 -05:00
parent 95c07063f2
commit 93bcfabc23
2 changed files with 13 additions and 8 deletions

View File

@ -452,11 +452,18 @@ u3_king_commence()
*/
u3m_boot_pier();
{
extern c3_w u3_Ivory_length_w;
extern c3_y u3_Ivory_pill_y[];
u3_noun lit;
u3_noun lit;
if ( 0 != u3_Host.ops_u.lit_c ) {
lit = u3m_file(u3_Host.ops_u.lit_c);
}
else {
extern c3_w u3_Ivory_length_w;
extern c3_y u3_Ivory_pill_y[];
lit = u3i_bytes(u3_Ivory_length_w, u3_Ivory_pill_y);
}
lit = u3i_bytes(u3_Ivory_length_w, u3_Ivory_pill_y);
u3v_boot_lite(lit);
}

View File

@ -92,10 +92,8 @@ _main_getopt(c3_i argc, c3_c** argv)
while ( (ch_i=getopt(argc, argv,"G:J:B:K:H:w:u:e:E:f:F:k:p:LabcdgqtvxPDRS")) != -1 ) {
switch ( ch_i ) {
case 'J': {
// XX should set path to ivory pill
// u3_Host.ops_u.lit_c = strdup(optarg);
// break;
return c3n;
u3_Host.ops_u.lit_c = strdup(optarg);
break;
}
case 'B': {
u3_Host.ops_u.pil_c = strdup(optarg);