gcc/libgfortran/generated/in_unpack_r4.c - Issue 3050029: [gcc] GCC 4.5.0=>4.5.1

Keyboard Shortcuts

	File
u :	up to issue
j / k :	jump to file after / before current file
J / K :	jump to next file with a comment after / before current file
	Side-by-side diff
i :	toggle intra-line diffs
e :	expand all comments
c :	collapse all comments
s :	toggle showing all comments
n / p :	next / previous diff chunk or comment
N / P :	next / previous comment
<Up> / <Down> :	next / previous line

	Issue
u :	up to list of issues
j / k :	jump to patch after / before current patch
o / <Enter> :	open current patch in side-by-side view
i :	open current patch in unified diff view

	Issue List
j / k :	jump to issue after / before current issue
o / <Enter> :	open current issue

Unified Diff: gcc/libgfortran/generated/in_unpack_r4.c

Issue 3050029: [gcc] GCC 4.5.0=>4.5.1 (Closed) Base URL: ssh://git@gitrw.chromium.org:9222/nacl-toolchain.git

Patch Set: Created 10 years, 5 months ago

Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.

Jump to:

Index: gcc/libgfortran/generated/in_unpack_r4.c

diff --git a/gcc/libgfortran/generated/in_unpack_r4.c b/gcc/libgfortran/generated/in_unpack_r4.c

index abf8aea69829dff098a79326d7b8a10d5b5b1e58..f436c8afa85dab645acb3745aca1a3dd41fa6c29 100644

--- a/gcc/libgfortran/generated/in_unpack_r4.c

+++ b/gcc/libgfortran/generated/in_unpack_r4.c

@@ -52,8 +52,8 @@ internal_unpack_r4 (gfc_array_r4 * d, const GFC_REAL_4 * src)

for (n = 0; n < dim; n++)

{

count[n] = 0;

- stride[n] = d->dim[n].stride;

- extent[n] = d->dim[n].ubound + 1 - d->dim[n].lbound;

+ stride[n] = GFC_DESCRIPTOR_STRIDE(d,n);

+ extent[n] = GFC_DESCRIPTOR_EXTENT(d,n);

if (extent[n] <= 0)

return;

« no previous file with comments | « gcc/libgfortran/generated/in_unpack_r10.c ('k') | gcc/libgfortran/generated/matmul_c10.c » ('j') | no next file with comments »