Merge pull request #36 from sezero/patches-fix

sfdc: update patches after changes to original git repo

Author: cahirwpz

patches/sfdc/Dump.pl.diff

@@ -1,11 +1,11 @@
 --- sfdc/Dump.pl	2005-09-24 16:49:49.000000000 +0200
 +++ sfdc/Dump.pl	2013-08-30 15:46:41.000000000 +0200
 @@ -19,7 +19,7 @@
- 	my $sfd  = $self->{SFD};
+       my $sfd  = $self->{SFD};
 
- 	print "SFD information\n";
--	print "¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯\n";
-+	print "---------------\n";
- 	print "Copyright:		$$sfd{'copyright'}\n";
- 	print "RCS ID:			$$sfd{'id'}\n";
- 	print "Module name:		$$sfd{'libname'}\n";
+       print "SFD information\n";
+-      print "¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯\n";
++      print "---------------\n";
+       print "Copyright:       $$sfd{'copyright'}\n";
+       print "RCS ID:                $$sfd{'id'}\n";
+       print "Module name:           $$sfd{'libname'}\n";

patches/sfdc/SFDCompile.pod.diff

@@ -1,6 +1,6 @@
 --- sfdc/SFDCompile.pod	2005-09-24 16:49:49.000000000 +0200
 +++ sfdc/SFDCompile.pod	2014-05-25 22:50:56.894529535 +0200
-@@ -326,7 +326,7 @@
+@@ -334,7 +334,7 @@
  =head1 NOTES
 
  Had I seen F<cvinclude.pl> before I started writing this program, I
@@ -9,7 +9,7 @@
 
  =head1 AUTHOR
 
-@@ -334,98 +334,114 @@
+@@ -342,98 +342,114 @@
 
  =head1 HISTORY
 

patches/sfdc/main.pl.diff

@@ -1,15 +1,15 @@
 --- sfdc/main.pl	2005-09-24 16:49:49.000000000 +0200
 +++ sfdc/main.pl	2013-08-30 15:13:28.000000000 +0200
-@@ -418,7 +418,7 @@
+@@ -420,7 +420,7 @@
      my $comment   = '';
 
      my $result = {
--	copyright  => 'Copyright © 2001 Amiga, Inc.',
-+	copyright  => 'Copyright (c) 2001 Amiga, Inc.',
- 	id         => '',
- 	libname    => '',
- 	base       => '',
-@@ -849,8 +849,8 @@
+-      copyright  => 'Copyright © 2001 Amiga, Inc.',
++      copyright   => 'Copyright (c) 2001 Amiga, Inc.',
+       id         => '',
+       libname    => '',
+       base       => '',
+@@ -866,8 +866,8 @@
 
 
      # Make sure we have the same number of arguments as registers, or,
@@ -19,4 +19,4 @@
 +    # Tagcalls always have one extra, a la "Tag, ...".
 
      if (($prototype->{type} eq 'varargs' &&
- 	 $prototype->{subtype} eq 'tagcall' &&
+        $prototype->{subtype} eq 'tagcall' &&