ada.adb 289 Bytes
1 2 3 4 5 6 7 8 9 10 11 12 13 
-- Syntax Highlighting test file for Ada
-- Some Comments about this file
pragma Name (Parameter_List);
with Ada.Text_IO; 

procedure Hello is
begin
   Ada.Text_IO.Put_Line("Hello, world!");
   Ada.Text_IO.Put_Line("Unclosed string);
end Hello;

My_Number := 1;
_Ilegal_Identifier := 'a';