#IFDEF __@INSIDE_STRUCT@__ #IFADIM !2 STRUCT_ARRAY_MEMBER !1 !2 !3 !4 !5 !6 !7 !8 !9 #ELSE STRUCT_SCALAR_MEMBER !1 !2 !3 !4 !5 !6 !7 !8 !9 #ENDIF #ELSE #IFDEF __@INSIDE_FUNCTION@__ //#IF (!Zl & 2) // warn if old style and odd // #REM #ERROR DFERR_COMP_OBSOLETE_UNSUPPORTED_FEATURE Old style usage: Possible global variable in method //#ENDIF // jjt - used to be "& 1" which was wrong. 2 is old style flag, 1 is strict. changed in 9.1 // I would hope that no-one is using this feature anymore. #IF (!Zl & 2) // old style - force to global Global_Variable !1 !2 !3 !4 !5 !6 !7 !8 !9 #REM WARNING: Global Variable defined in method #ELSE Local !1 !2 !3 !4 !5 !6 !7 !8 !9 #ENDIF #ELSE Global_Variable !1 !2 !3 !4 !5 !6 !7 !8 !9 #ENDIF #ENDIF