allow extra whitespace and comments at end of ledger

Ledger/Parse.hs

@@ -171,14 +171,14 @@ ledger = do
   modifier_entries <- many ledgermodifierentry
   periodic_entries <- many ledgerperiodicentry
 
-  entries <- (many ledgerentry) <?> "entry"
+  entries <- (many $ try ledgerentry) <?> "entry"
   final_comment_lines <- ledgernondatalines
   eof
   return $ RawLedger modifier_entries periodic_entries entries (unlines final_comment_lines)
 
 ledgernondatalines :: Parser [String]
-ledgernondatalines = many (ledgerdirective <|> -- treat as comments
+ledgernondatalines = many (try ledgerdirective <|> -- treat as comments
-                           commentline <|> 
+                           try commentline <|> 
                            blankline)
 
 ledgerdirective :: Parser String

NOTES

@@ -6,8 +6,6 @@ implementations were its consequences." --Niklaus Wirth
 
 * to do
 ** errors
-*** ? in description or amount gives "too many blank transactions"
-*** parse commented lines at end of file 
 *** display mixed amounts vertically, not horizontally
 ** features
 *** flexible date expressions, for easier time reports

sample.ledger

@@ -34,3 +34,6 @@
 2008/1/1 * pay off
     liabilities:debts  $1
     assets:checking
+
+
+  ;final comment