put newline before own #line directive

PDLPorters · Sep 30, 2021 · 1276430 · 1276430
1 parent 5fb6f86
commit 1276430
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/Changes b/Changes
@@ -1,3 +1,5 @@
+- whitespace fix for #line directive
+
 0.16 2021-08-08
 - planning now works on threaded Perl - thanks @zmughal
 

diff --git a/FFTW3.pd b/FFTW3.pd
@@ -257,5 +257,5 @@ sub slurp
   local $/ = undef;
   my $contents = <FD>;
   close FD;
-  return qq{#line 0 "$filename"\n\n} . $contents;
+  return qq{\n#line 0 "$filename"\n\n} . $contents;
 }