topic I had thought of transfer but in Intel® Fortran Compiler

How to write C_INT32_T value in fortran?

steve_o_ — Mon, 09 Apr 2018 08:43:38 GMT

I'm writing a hashing function using unsigned 32 bit integers, however I'm not sure if it can be written/printed? Haven't seen any documentation

What's the best method to write/print a c_int32_t integer in fortran ? In C printf would use PRIu32

I would say: copy the bits

Arjen_Markus — Mon, 09 Apr 2018 10:02:57 GMT

I would say: copy the bits into a 64-bits integer and print that. I have not tested it but try:

i64 = transfer( [0, unsigned_int32], i64 )

(or the other way around?) Or use the bit manipulation routines.

In Intel Fortran, you could

Steve_Lionel — Mon, 09 Apr 2018 14:05:55 GMT

In Intel Fortran, you could use ZEXT(val,C_INT64_T). That is an extension, though widely implemented. In standard Fortran Arjen's suggestion is clever and workable. Unfortunately the various bit intrinsics, such as IBITS, don't allow changing the kind of the result. You could do something like IAND(INT(val,C_INT64_T),Z'00000000FFFFFFFF'), but that looks awkward.

Example:

use ISO_C_BINDING
integer(4) val
val = -214748364
print ('(Z8.8)'), IAND(INT(val,C_INT64_T),Z'00000000FFFFFFFF')
end

D:\Projects>ifort /stand t.f90
Intel(R) Visual Fortran Intel(R) 64 Compiler for applications running on
 Intel(R) 64, Version 18.0.2.185 Build 20180210
Copyright (C) 1985-2018 Intel Corporation.  All rights reserved.

Microsoft (R) Incremental Linker Version 14.13.26129.0
Copyright (C) Microsoft Corporation.  All rights reserved.

-out:t.exe
-subsystem:console
t.obj

D:\Projects>t.exe
F3333334

I had thought of transfer but

steve_o_ — Tue, 10 Apr 2018 06:27:49 GMT

I had thought of transfer but ZEXT works and is neater, thanks