From df7ce245edef11f2cf8c5be9648d5a596eba9344 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Mon, 20 Jul 2015 09:36:20 -0700 Subject: [PATCH] tools.image-analyzer.data-heap-reader: cell => cell_t. --- .../image-analyzer/data-heap-reader/data-heap-reader.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/extra/tools/image-analyzer/data-heap-reader/data-heap-reader.factor b/extra/tools/image-analyzer/data-heap-reader/data-heap-reader.factor index bde3f80abd..a9b268d991 100644 --- a/extra/tools/image-analyzer/data-heap-reader/data-heap-reader.factor +++ b/extra/tools/image-analyzer/data-heap-reader/data-heap-reader.factor @@ -62,7 +62,7 @@ GENERIC: read-payload ( rel-base struct -- tuple ) ] [ object seek-past-padding ] bi ; : read-array-payload ( array -- payload ) - [ capacity>> -4 shift ] keep cell read-padded-payload ; + [ capacity>> -4 shift ] keep cell_t read-padded-payload ; : read-uchar-payload ( n-bytes object -- payload ) uchar read-padded-payload ; @@ -94,7 +94,7 @@ M: tuple read-payload ( rel-base tuple -- payload ) layout-address seek-absolute seek-input tuple-layout read-struct size>> -4 shift ] save-io-excursion - ] keep cell read-padded-payload ; + ] keep cell_t read-padded-payload ; : peek-read-object ( -- object ) [ object read-struct ] save-io-excursion ;