1: #line 822 "./lpsrc/flx_regress.pak" 2: //Check lvalues
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);