Skip to content

Commit b6d07e6

Browse files
authored
Update src/stdlib_intrinsics_matmul.fypp
1 parent cf5f030 commit b6d07e6

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/stdlib_intrinsics_matmul.fypp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -151,7 +151,7 @@ contains
151151
if (present(m3)) then
152152

153153
if (size(m3, 1) /= p(3)) then
154-
err0 = linalg_state_type(this, LINALG_VALUE_ERROR, 'matrices m2, m3 not of compatible sizes')
154+
err0 = linalg_state_type(this, LINALG_VALUE_ERROR, 'matrices m2=',shape(m2),', m3=',shape(m3),'have incompatible sizes')
155155
call linalg_error_handling(err0, err)
156156
allocate(res(0, 0))
157157
return

0 commit comments

Comments
 (0)