Commit 56e6e8ce authored by Budiardja, Reuben's avatar Budiardja, Reuben
Browse files

Renamed dir.

parent 6be905d1
......@@ -12,7 +12,7 @@ void C_Allocate ( CFI_cdesc_t *A_DV, CFI_cdesc_t *ShapeDV, int *Status )
CFI_index_t *lbounds, *ubounds;
printf("=== Entering C_Allocate === \n");
printf("A_DV.rank: %d\nShapeDV.elem_len: %d\n",
printf("A_DV.rank: %d\nShapeDV->dim[0].extent: %d\n",
A_DV->rank, (int) ShapeDV->dim[0].extent);
// Error checking
if ( A_DV->rank != ShapeDV->dim[0].extent )
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment