-#else
- {
- /* rows are mutarrays in xmlambda, maybe we should make a new type: ROW */
- StgWord i;
- StgMutArrPtrs* p = stgCast(StgMutArrPtrs*,obj);
-
- debugBelch("Row<%i>(",p->ptrs);
- for (i = 0; i < p->ptrs; ++i) {
- if (i > 0) debugBelch(", ");
- printPtr((StgPtr)(p->payload[i]));
- }
- debugBelch(")\n");
- break;
- }
-#endif