static void ProcHeapsize( void )
/******************************/
{
unsigned long value;
if( !MakeToken( SEP_NO, true ) ) {
Warning( "argument for heapsize not recognized", OPTION_SLOT );
} else if( memicmp( CmdFile->token, "maxval", 6 ) == 0 ) {
AddNumOption( "heapsize", 0xFFFF );
} else if( !GetNumber( &value ) || value >= (64*1024UL) ) {
Warning( "argument for heapsize not valid", OPTION_SLOT );
} else {
AddNumOption( "heapsize", value );
}
}
static void ProcNoPackCode( const char *arg )
/*******************************************/
{
/* unused parameters */ (void)arg;
AddNumOption( "packcode", 0 ); // option packcode=0 doesn't pack code.
}
static void ProcPackCode( const char *arg )
/*****************************************/
{
unsigned long value;
value = 65535;
if( arg != NULL && !GetNumberStr( &value, arg, strlen( arg ) ) )
Warning( "invalid numeric value", OPTION_SLOT );
AddNumOption( "packcode", value );
}
static void ProcStackSize( void )
/*******************************/
{
unsigned long value;
if( !MakeToken( SEP_NO, true ) ) {
Warning( "argument for stacksize is invalid", OPTION_SLOT );
} else if( !GetNumber( &value ) || value >= (64*1024UL) ) {
Warning( "argument for stacksize is invalid", OPTION_SLOT );
} else {
AddNumOption( "stack", value );
}
}
static void ProcStack( const char *arg )
/**************************************/
{
bool success;
unsigned long value;
value = 0;
success = ( arg != NULL && GetNumberStr( &value, arg, strlen( arg ) ) );
if( !success ) {
Warning( "stack argument not recognized", OPTION_SLOT );
} else {
AddNumOption( "stack", value );
}
}
static void ProcAlignment( const char *arg )
/******************************************/
{
bool success;
unsigned long value;
value = 0;
success = ( arg != NULL && GetNumberStr( &value, arg, strlen( arg ) ) );
if( !success ) {
Warning( "invalid alignment specification", OPTION_SLOT );
} else {
AddNumOption( "alignment", value );
}
}
static void ProcNoPackCode( const char *arg )
/*******************************************/
{
arg=arg;
AddNumOption( "packcode", 0 ); // option packcode=0 doesn't pack code.
}