Fix shebang lexing.

Author: deadalnix

src/source/dlexer.d

@@ -372,16 +372,11 @@ struct DLexer {
 
 	import source.name;
 	Name popSheBang() {
-		auto c = frontChar;
-		if (c != '#') {
+		if (frontChar != '#' || nextChar != '!') {
 			return BuiltinName!"";
 		}
 
-		while (c != '\n') {
-			popChar();
-			c = frontChar;
-		}
-
+		popLine();
 		return context.getName(content[0 .. index]);
 	}
 

test/compilable/nonutf8_shebang.d

@@ -1,5 +1,4 @@
 #!/opt/dmd/ÐÒÏÂÙ/rdmd
-
 import core.stdc.stdio;
 
 void main() {