End

│ Deutsch (de) │ English (en) │ suomi (fi) │ français (fr) │ русский (ru) │

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

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;

Keywords: begin — do — else — end — for — if — repeat — then — until — while