David Benjamin 5 年之前
committed by Adam Langley
父節點
當前提交
24a18b8a40
共有 1 個文件被更改,包括 5 次插入2 次删除
  1. +5
    -2
      crypto/perlasm/x86_64-xlate.pl

+ 5
- 2
crypto/perlasm/x86_64-xlate.pl 查看文件

@@ -1188,8 +1188,11 @@ while(defined(my $line=<>)) {
$line =~ s|[#!].*$||; # get rid of asm-style comments...
} else {
# Get rid of asm-style comments but not preprocessor directives. The
# latter are identified by not having a space after the '#'.
$line =~ s|[#!] .*$||;
# former are identified by having a letter after the '#' and starting in
# the first column.
$line =~ s|!.*$||;
$line =~ s|(?<=.)#.*$||;
$line =~ s|^#([^a-z].*)?$||;
}

$line =~ s|/\*.*\*/||; # ... and C-style comments...


Loading…
取消
儲存