End

The keyword end terminates an entity. It appears at several occasions:

• to mark the end of a module, i.e. a program, unit or library
• to conclude a block of statements or instructions respectively
  • either started by begin, or
  • started by asm
• to wrap up some language constructs:
  • most prominently if … then … end, or
  • case … of … end, but also
  • try … except … finally … end
• to finish off certain type declarations, such as object, record and class
• in extended Pascal to end do … starts the definition of the finalization part of a module

For example:

procedure proc0;
var
    a, b: integer;
begin
    ���
end;

The end gloss is one of the exceptions to the rule that every statement must be followed by a semicolon. The statement immediately preceding an end does not require a semicolon.

It is also used to end a Pascal module, in which case it is followed by a period rather than a semicolon (in the example below, the last semicolon is optional):

program proc1;
var
    SL: TStrings;
begin
    SL := TStringlist.create;
    try
        ���
    finally
        SL.free;
    end;
end.

end is used to indicate the end of the unit:

  unit detent;
  uses math;
 
  procedure delta(r:real);
 
  implementation
 
  procedure delta;
  begin
 
  ...
 
  end;
 
  ...
  (* Note: No corresponding '''begin''' statement *)
 
  end.

It also closes a record:

 Type
   ExampleRecord = Record
                     Values: array [1..200] of real;
                     NumValues: Integer; { holds the actual number of points in the array }
                     Average: Real { holds the average or mean of the values in the array }
                   End;

From the Free Pascal wiki, page "End", as it stood on 2020-06-24 after a change by Kai Burghardt, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.