- if $TargetPlatform =~ /-apple-darwin/;
- return(&process_asm_block_m68k($str)) if $TargetPlatform =~ /^m68k-/;
- return(&process_asm_block_sparc($str)) if $TargetPlatform =~ /^sparc-/;
- return(&process_asm_block_iX86($str)) if $TargetPlatform =~ /^i[34]86-/;
- return(&process_asm_block_x86_64($str)) if $TargetPlatform =~ /^x86_64-/;
- return(&process_asm_block_alpha($str)) if $TargetPlatform =~ /^alpha-/;
- return(&process_asm_block_hppa($str)) if $TargetPlatform =~ /^hppa/;
- return(&process_asm_block_mips($str)) if $TargetPlatform =~ /^mips-/;
+ if $TargetPlatform =~ /-apple-darwin/m;
+ return(&process_asm_block_m68k($str)) if $TargetPlatform =~ /^m68k-/m;
+ return(&process_asm_block_sparc($str)) if $TargetPlatform =~ /^sparc-/m;
+ return(&process_asm_block_iX86($str)) if $TargetPlatform =~ /^i[34]86-/m;
+ return(&process_asm_block_x86_64($str)) if $TargetPlatform =~ /^x86_64-/m;
+ return(&process_asm_block_alpha($str)) if $TargetPlatform =~ /^alpha-/m;
+ return(&process_asm_block_hppa($str)) if $TargetPlatform =~ /^hppa/m;
+ return(&process_asm_block_mips($str)) if $TargetPlatform =~ /^mips-/m;