> From: Ed > I'm guessing that you have an array dimensioned in the > common? Pick flavor default to $OPTIONS STATIC.DIM, > while Information flavor defaults to $OPTIONS > -STATIC.DIM. With STATIC.DIM, each array A(n) takes up > n slots in common, but with -STATIC.DIM, the entire > array takes one slot.
I think you nailed it bud. I had no clue. Here's the code in question: COMMON /NRND/ NEBULA.INITIALIZED, NEBULA.INFO(50) So yes, it seems that Pick flavor sees 51 elements but Information sees 2. Assume we add this to the Information code which Includes that Common statement. $OPTIONS STATIC.DIM (I don't want to suggest that the Information code get full $OPTIONS PICK.) I believe that still allows the calling code to run in information flavor even though the called code is Pick flavor. Can we mix like that with impunity? George wrote: > Not sure what you meant by F-point to the code....so > that might make the difference. F-point = Q-point with an F-pointer, no? :) Thanks again. T _______________________________________________ U2-Users mailing list [email protected] http://listserver.u2ug.org/mailman/listinfo/u2-users
