Patch: pack/unpack added to Blanca branch

[Stephen Smith]

I've added pack and unpack to the blanca-2001Oct01 branch.
The functions return a RefCountedBlockPtr, so you don't have
to allocate or delete storage:

RefCountedBlockPtr<double> ptr = pack(field);

fortran_code(ptr.beginPointer(), ptr.size()); // operate on double*, size

unpack(field, ptr);

Pack returns a 1-D block of data that includes all the data local
to a given processor, excluding the guard layers.  unpack performs
the inverse operation.

Let me know if this solution is sufficient and works for you.
Thanks,

     Stephen

<<10Sep.pack.blanca.patch>>

10Sep.pack.blanca.patch
Description: Binary data