[ Course Documents ] : [ Subprograms ]

Previous Contents Next Keyword Index

Pass-By-Name Example 2

• Assume k is a global variable

    procedure sub1(x: int; y: int; z: int);
    begin
        k := 1;
        y := x;
        k := 5;
        z := x;
    end;

    sub1(k+1, j, i);