tests/basic/ref-arg.sp
author Asher Baker <asherkin@gmail.com>
Mon Jun 10 01:04:43 2013 +0100 (2013-06-10)
changeset 263 ba85a47ee414
parent 222 0cde1379b29f
permissions -rw-r--r--
Normalise line endings.
asherkin@263
     1
native PrintNum(b);
asherkin@263
     2
asherkin@263
     3
f(&a)
asherkin@263
     4
{
asherkin@263
     5
    for (new i = 0; i < 10; i = i + 1)
asherkin@263
     6
        a = a + i;
asherkin@263
     7
    return 0;
asherkin@263
     8
}
asherkin@263
     9
asherkin@263
    10
g(&b)
asherkin@263
    11
{
asherkin@263
    12
    return f(b);
asherkin@263
    13
}
asherkin@263
    14
asherkin@263
    15
public main()
asherkin@263
    16
{
asherkin@263
    17
    new b = 77;
asherkin@263
    18
    g(b);
asherkin@263
    19
    PrintNum(b);
asherkin@263
    20
}