if (int_q($a)) {
  emit_code('set', [int_reg_q($b) ? 'I0' : 'N0', $a]);
  $a = 'I0';
} elsif (num_q($a)) {
  emit_code('set', ['N0', $a]);
  $a = 'N0';
} elsif (!reg_q($a)) {
  printf STDERR "jakoc: Syntax error in comparison on line %d!\n", $line;
}

if (int_q($b)) {
  emit_code('set', [int_reg_q($a) ? 'I0' : 'N0', $b]);
  $b = 'I0';
} elsif (num_q($b)) {
  emit_code('set', ['N0', $b]);
  $b = 'N0';
} elsif (!reg_q($b)) {
  printf STDERR "jakoc: Syntax error in comparison on line %d!\n", $line;
}