]> code.delx.au - gnu-emacs/blobdiff - test/indent/pascal.pas
Update copyright year to 2015
[gnu-emacs] / test / indent / pascal.pas
index e7203fece686c78162a85f233bbb1e6271d02a90..bb2e7002b6b50c2f399b163474c147397c298666 100644 (file)
@@ -1,6 +1,6 @@
 { GPC demo program for the CRT unit.
 
-Copyright (C) 1999-2006, 2013 Free Software Foundation, Inc.
+Copyright (C) 1999-2006, 2013-2015 Free Software Foundation, Inc.
 
 Author: Frank Heckenbach <frank@pascal.gnu.de>
 
@@ -29,6 +29,7 @@ by the GNU General Public License. }
 // Free-pascal style comment.
 var x:Char = 12 /* 45;   // This /* does not start a comment.
 var x:Char = (/ 4);      // This (/ does not start a comment.
+var a_to_b : integer;    // 'to' should not be highlighted
 
 program CRTDemo;
 
@@ -688,7 +689,7 @@ var
       NoSound;
       RestoreTerminalClearCRT;
       WriteLn (StdErr, 'You''re trying to kill me. Since I have break checking turned off,');
-      WriteLn (StdErr, 'I''m not dying, but I''ll do you a favour and terminate now.');
+      WriteLn (StdErr, 'I''m not dying, but I''ll do you a favor and terminate now.');
       Halt (3)
    end;