
'These have params BYVAL
'=======================

function f1(single a,b,c,d) as single
  d*=10
  function=b*10
end function

single f2(single a,b,c,d)
{
  d*=10
  function=b*10
}




'These have params BYREF
'=======================

function f3(single a,b,c,single *d) as single
  d*=10
  function=b*10
end function



single f4(single *a,*b,*c,single *d)
{
  d*=10
  function=b*10
}


'#recordof f3

single a=1.25,b=2.25,c=3.25,d=4.25


print f3 a,b,c,d
print d




