void
set_skip_command(unsigned val)
{
if (lk_step_ended == TRUE) {
if (val>127) {
warning_0("Maximum SKIP amount is 127; ignored");
} else {
lig_kern_table[nl-1].entries[0] = val;
if (min_nl <= (nl+val)) { min_nl = nl+val+1; }
}
} else {
warning_0("SKIP must follow LIG or KRN; ignored");
}
lk_step_ended = FALSE;
}
void
set_vtitle(string title)
{
if (vtitle!=NULL) {
warning_0("VTITLE previously defined; old value ignored");
free(vtitle); vtitle = NULL;
}
vtitle = title;
}
void
set_stop_command(void)
{
if (lk_step_ended == TRUE) {
lig_kern_table[nl-1].entries[0] =
lig_kern_table[nl-1].entries[0] / 256 * 256 + STOP_FLAG;
} else {
warning_0("STOP must follow LIG or KRN; ignored");
}
lk_step_ended = FALSE;
}
void
set_font_design_size(fix ds)
{
if (cur_font==NULL) {
internal_error_0("set_font_design_size");
}
if (cur_font->font_dsize_defined != FALSE) {
warning_0("FONTDSIZE previously defined; old value ignored");
}
cur_font->font_dsize = ds;
cur_font->font_dsize_defined = TRUE;
}
void
set_font_at(fix at)
{
if (cur_font==NULL) {
internal_error_0("set_font_at");
}
if (cur_font->font_at_defined != FALSE) {
warning_0("FONTAT previously defined; old value ignored");
}
cur_font->font_at = at;
cur_font->font_at_defined = TRUE;
}
void
set_font_check_sum(unsigned cs)
{
if (cur_font==NULL) {
internal_error_0("set_font_check_sum");
}
if (cur_font->font_checksum_defined != FALSE) {
warning_0("FONTCHECKSUM previously defined; old value ignored");
}
cur_font->font_checksum = cs;
cur_font->font_checksum_defined = TRUE;
}
void
set_font_area(string area)
{
if (cur_font==NULL) {
internal_error_0("set_font_area");
}
if (cur_font->font_area != NULL) {
warning_0("FONTAREA previously defined; old value ignored");
free(cur_font->font_area);
cur_font->font_area=NULL;
}
cur_font->font_area = area;
}
void
set_font_name(string name)
{
if (cur_font==NULL) {
internal_error_0("set_font_name");
}
if (cur_font->font_name != NULL) {
warning_0("FONTNAME previously defined; old value ignored");
free(cur_font->font_name);
cur_font->font_name=NULL;
}
cur_font->font_name = name;
}