diff options
Diffstat (limited to 'rts/parallel/ParallelDebug.c')
| -rw-r--r-- | rts/parallel/ParallelDebug.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/parallel/ParallelDebug.c b/rts/parallel/ParallelDebug.c index b357af6379..5616a9a945 100644 --- a/rts/parallel/ParallelDebug.c +++ b/rts/parallel/ParallelDebug.c @@ -1269,7 +1269,7 @@ PrintGraph_(StgClosure *p, int indent_level) case ARR_WORDS: /* an array of (non-mutable) words */ fprintf(stderr, "ARR_WORDS (%p) of %d non-ptrs (maybe a string?)\n", - p, ((StgArrWords *)q)->words); + p, arr_words_words((StgArrWords *)q)); break; case MUT_ARR_PTRS: @@ -1626,7 +1626,7 @@ GraphFingerPrint_(StgClosure *p, char *finger_print) case ARR_WORDS: { char str[6]; - sprintf(str,"%d",((StgArrWords*)p)->words); + sprintf(str,"%d",arr_words_words((StgArrWords*)p)); strcat(finger_print,str); } break; |