Ada Code Generation : Package Body : Action Procedures

Action Procedures

In some cases (depending on the modularity style), actions are translated into procedures:

procedure EXEC_GET_TRAIN_SPEED is
begin
seti(TRAIN_SPEED’address,160);
end EXEC_GET_TRAIN_SPEED ;