1: #line 697 "./lpsrc/flx_tut_bind.pak" 2: #import <flx.flxh> 3: 4: body """ 5: int n = 3; 6: void ff() { n++; } 7: int g(int a) { return a * a; } 8: #define N 4 9: """; 10: 11: proc ff: unit; 12: fun g: int-> int; 13: const n:int; 14: const N:int; 15: 16: print n; endl; 17: ff(); print n; endl; 18: print N; endl; 19: print (g N); endl; 20:
1: 3 2: 4 3: 4 4: 16