1.2.21. test/regress/rt-1.01.21

     1: #line 822 "./lpsrc/flx_regress.pak"
     2: //Check lvalues
Start felix section to test/regress/rt-1.01.21-0.flx[1 /1 ]
     3: // lvalue decay if function called thru variable
     4: #import <flx.flxh>
     5: 
     6: proc f(g:int->void) { var x=1; g x; }
     7: proc g(x:int) { }
     8: f g of (int);
End felix section to test/regress/rt-1.01.21-0.flx[1]
Start data section to test/regress/rt-1.01.21-0.expect[1 /1 ]
End data section to test/regress/rt-1.01.21-0.expect[1]