Adding new comment-matching regex to help license check with assembly files.

third_party/devscripts/licensecheck.pl

 #!/usr/bin/perl -w
 # This script was originally based on the script of the same name from
 # the KDE SDK (by dfaure@kde.org)
 #
 # This version is
 #   Copyright (C) 2007, 2008 Adam D. Barratt
 #   Copyright (C) 2012 Francesco Poli
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ skipping 324 matching lines @@
         print "  [Copyright: " . $copyright . "]\n"
           if $copyright and $opt_copyright;
         print "\n" if $opt_copyright;
     }
 }
 
 sub remove_comments($) {
     $_ = $_[0];
     # Remove Fortran comments
     s/^[cC] //gm;
+    # Remove .ASM comments
+    s#^;\*?##gm;
+    # Remove .S comments
+    s#^@ ##gm;
+    # Remove new lines
     tr/\t\r\n/ /;
     # Remove C / C++ comments
     s#(\*/|/[/*])##g;
+    # Remove all characters not matching search
     tr% A-Za-z.,@;0-9\(\)/-%%cd;
+    # Collapse multiple spaces into single space
     tr/ //s;
     $_[0] = $_;
 }
 
 sub parse_copyright($) {
     my $copyright = '';
     my $match;
 
     my $copyright_indicator_regex = '
         (?:copyright    # The full word
@@ skipping 296 matching lines @@
     return $license;
 }
 
 sub fatal($) {
     my ($pack,$file,$line);
     ($pack,$file,$line) = caller();
     (my $msg = "$progname: fatal error at line $line:\n@_\n") =~ tr/\0//d;
     $msg =~ s/\n\n$/\n/;
     die $msg;
 }