$T_COPY_DIRVS = '\.(global|proc|stab)';
$T_hsc_cc_PAT = '\.asciz.*\)(hsc|cc) (.*)\\\\t(.*)"';
- $T_DOT_WORD = '\.(word|byte|half|skip|uahalf|uaword)';
+ $T_DOT_WORD = '\.(long|word|byte|half|skip|uahalf|uaword)';
$T_DOT_GLOBAL = '^\t\.global';
$T_HDR_literal = "\.text\n\t\.align 8\n";
$T_HDR_misc = "\.text\n\t\.align 4\n";
# (which loads the current instruction pointer into register r31)
$p .= "bcl 20,31,$pcrel_label\n";
$p .= "$pcrel_label:\n";
- $p .= "\tmflr r31";
+ $p .= "\tmflr r31\n";
}
# glue together what's left