目录
5. Equality - Pass by Reference
1. 引言
本章介绍霍尔逻辑和指针编程,通过Ada语言来阐述函数的传参方法。主要讲解了两种传参方式,分别是按值传递(Pass By Value)和按引用传递(Pass By Reference),同时讨论了这两种方式在比较两个对象是否相等时的不同表现。
2. Pass By Value
procedure Pass_By_Value is
type Rec is record
X : Integer;
end record;
R : Rec;
procedure Print_R is
begin
Put("R.X: "); Put(R.X); New_Line;
end Print_R;
procedure CheckR(givenR : in out Rec) is
begin
put("In CheckR"); New_Line;
givenR.X := R.X + 1;
Print_R;
end CheckR;
begin
R.X := 5;
CheckR(R);
Put("CheckR done"); New_Line;
Print_R;
end Pass_By_Value;
- 在这个例子中,我们创建了一个记录类型
Rec
,包含一个整型字段X
,并且定义了一个该类型的变量R
。 - 然后,我们定义了两个程序
Print_R
和