[fix trailing whitespace
John Meacham <john@repetae.net>**20051002024804] hunk ./FrontEnd/README.FrontEnd 3
-various documents from the original sources follow. 
+various documents from the original sources follow.
hunk ./FrontEnd/README.FrontEnd 20
-lifts instance declarations to their own functions 
+lifts instance declarations to their own functions
hunk ./FrontEnd/README.FrontEnd 27
-added support for record syntax and record desugaring 
+added support for record syntax and record desugaring
hunk ./FrontEnd/README.FrontEnd 33
-Hatchet version 0.1 is derived from a number of sources 
-each with their own Copyright and License restrictions. 
+Hatchet version 0.1 is derived from a number of sources
+each with their own Copyright and License restrictions.
hunk ./FrontEnd/README.FrontEnd 41
-is provided in the file "License.thih". Please read 
+is provided in the file "License.thih". Please read
hunk ./FrontEnd/README.FrontEnd 45
-all good lifeforms and machines to use and distribute 
-it in whole or part, as source or binary, modified or 
-unmodified, for any purpose providing the Licenses 
-and Copyrights of the component sources are also 
+all good lifeforms and machines to use and distribute
+it in whole or part, as source or binary, modified or
+unmodified, for any purpose providing the Licenses
+and Copyrights of the component sources are also
hunk ./FrontEnd/README.FrontEnd 51
-No warranty for any aspect of this software is 
+No warranty for any aspect of this software is
hunk ./data/jhc_rts.c 43
-int 
-main(int argc, char *argv[]) 
-{ 
+int
+main(int argc, char *argv[])
+{
hunk ./data/jhc_rts.c 51
-        return 0; 
+        return 0;
hunk ./data/jhc_rts.c 55
-jhc_error(char *s) { 
-    fputs(s,stderr); 
+jhc_error(char *s) {
+    fputs(s,stderr);
hunk ./data/jhc_rts.c 58
-    exit(255); 
+    exit(255);
hunk ./data/jhc_rts.c 64
-        fprintf(stderr, "\n%s:%i: case fell off\n", __FILE__, n); 
+        fprintf(stderr, "\n%s:%i: case fell off\n", __FILE__, n);
hunk ./data/operators.txt 4
-[int,float,char,ptr] 
+[int,float,char,ptr]
hunk ./data/operators.txt 13
-[int,float] 
+[int,float]
hunk ./data/operators.txt 34
-# [float] 
+# [float]
hunk ./data/primitives.txt 11
-Data.Int.Int16, int16_t, int, INT16_MAX, INT16_MIN 
+Data.Int.Int16, int16_t, int, INT16_MAX, INT16_MIN
hunk ./data/primitives.txt 19
-Data.Word.Word16, uint16_t, int, UINT16_MAX, 0 
+Data.Word.Word16, uint16_t, int, UINT16_MAX, 0
hunk ./data/primitives.txt 28
-Jhc.Addr.Addr, HsPtr, ptr,UINTPTR_MAX, 0 
-Jhc.Addr.FunAddr, HsFunPtr, ptr,UINTPTR_MAX,0 
+Jhc.Addr.Addr, HsPtr, ptr,UINTPTR_MAX, 0
+Jhc.Addr.FunAddr, HsFunPtr, ptr,UINTPTR_MAX,0
hunk ./data/primitives.txt 31
-Foreign.C.Types.CChar, char, int, CHAR_MAX, CHAR_MIN 
-Foreign.C.Types.CShort, short, int, SHORT_MAX, SHORT_MIN 
-Foreign.C.Types.CInt, int, int, INT_MAX, INT_MIN 
+Foreign.C.Types.CChar, char, int, CHAR_MAX, CHAR_MIN
+Foreign.C.Types.CShort, short, int, SHORT_MAX, SHORT_MIN
+Foreign.C.Types.CInt, int, int, INT_MAX, INT_MIN
hunk ./op_process.prl 1
-#!/usr/bin/perl -w 
+#!/usr/bin/perl -w
hunk ./op_process.prl 26
-#    push @fl, \@a unless $add eq 'int'; 
-#    push @in, \@a unless $add eq 'float'; 
+#    push @fl, \@a unless $add eq 'int';
+#    push @in, \@a unless $add eq 'float';
hunk ./op_process.prl 42
-my @inst; 
+my @inst;
hunk ./op_process.prl 54
-        #return "ELit (LitInt $v $t)"; 
-    } else {       
+        #return "ELit (LitInt $v $t)";
+    } else {
hunk ./op_process.prl 60
-} 
+}
hunk ./op_process.prl 65
-sub tcon($) { 
+sub tcon($) {
hunk ./op_process.prl 76
-sub dcon($) { 
+sub dcon($) {
hunk ./op_process.prl 87
-sub hsname($) { 
+sub hsname($) {
hunk ./op_process.prl 98
-sub tycon($) { 
+sub tycon($) {
hunk ./op_process.prl 127
-    my $ivar = "(tVr 2 tInt)"; 
-    my $ivart = "(tVr 2 tInteger)"; 
-    my $tvar = "(tVr 2 $t)"; 
+    my $ivar = "(tVr 2 tInt)";
+    my $ivart = "(tVr 2 tInteger)";
+    my $tvar = "(tVr 2 $t)";
hunk ./op_process.prl 177
-#print 'buildSignum v t = eCase (EVar v) [Alt (LitInt 0 t) (ELit (LitInt 0 t))] (eIf (EPrim (primPrim "prim_op_aaB.<") [EVar v,(ELit (LitInt 0 t))] tBool) (ELit (LitInt (-1) t)) (ELit (LitInt 1  t)))' . "\n\n";  
+#print 'buildSignum v t = eCase (EVar v) [Alt (LitInt 0 t) (ELit (LitInt 0 t))] (eIf (EPrim (primPrim "prim_op_aaB.<") [EVar v,(ELit (LitInt 0 t))] tBool) (ELit (LitInt (-1) t)) (ELit (LitInt 1  t)))' . "\n\n";
hunk ./op_process.prl 184
-print join("\n",map { $_->[1] } values %tcon) . "\n\n"; 
-print join("\n",map { $_->[1] } values %tycon) . "\n\n"; 
-print join("\n",map { $_->[1] } values %hsname) . "\n\n"; 
-print join("\n",map { $_->[1] } values %dcon) . "\n\n"; 
+print join("\n",map { $_->[1] } values %tcon) . "\n\n";
+print join("\n",map { $_->[1] } values %tycon) . "\n\n";
+print join("\n",map { $_->[1] } values %hsname) . "\n\n";
+print join("\n",map { $_->[1] } values %dcon) . "\n\n";
hunk ./op_raw.prl 1
-#!/usr/bin/perl -w 
+#!/usr/bin/perl -w
hunk ./op_raw.prl 8
-print "module $mod where\n\n\n"; 
+print "module $mod where\n\n\n";
hunk ./opt_sets.prl 1
-#!/usr/bin/perl 
+#!/usr/bin/perl
hunk ./opt_sets.prl 62
-print "\ninstance Show Flag where\n"; 
+print "\ninstance Show Flag where\n";
hunk ./opt_sets.prl 70
-    if ($h{$_}{hname}) { 
+    if ($h{$_}{hname}) {
hunk ./regress_test.prl 22
-        next unless /^\-\-R ([A-Z.a-z_'0-9]+)\s+(.+?)\s*$/; 
+        next unless /^\-\-R ([A-Z.a-z_'0-9]+)\s+(.+?)\s*$/;
hunk ./regress_test.prl 24
-        print "=> $v -> $r\n"; 
+        print "=> $v -> $r\n";
hunk ./regress_test.prl 30
-        #print "-> $v -> $r\n"; 
+        #print "-> $v -> $r\n";
hunk ./regress_test.prl 36
-} 
-   
+}
+