writing integer in unformatted form

[gxyd]

Recently, the PR: #3987 (enh: support "unformatted" write) was merged. It was supposed to handle unformatted write (for any string or an integer / real etc.). But writing integer doesn't work:

Fortran MRE

program expr2
    implicit none

    open(1, form="unformatted", file="tmp.txt")
    write(1) 35
    close(1)

end program

Generated LLVM IR

if we change write(1) 35 to write(1) "apple" it works just fine. On doing --show-llvm I get the below IR file:

; ModuleID = 'LFortran'
source_filename = "LFortran"

@0 = private unnamed_addr constant [8 x i8] c"tmp.txt\00", align 1
@1 = private unnamed_addr constant [12 x i8] c"unformatted\00", align 1
@2 = private unnamed_addr constant [2 x i8] c" \00", align 1
@3 = private unnamed_addr constant [2 x i8] c"\0A\00", align 1
@4 = private unnamed_addr constant [5 x i8] c"%d%s\00", align 1

define i32 @main(i32 %0, i8** %1) {
.entry:
  call void @_lpython_call_initial_functions(i32 %0, i8** %1)
  %2 = call i64 @_lfortran_open(i32 1, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @0, i32 0, i32 0), i8* null, i8* getelementptr inbounds ([12 x i8], [12 x i8]* @1, i32 0, i32 0))
  %3 = alloca i32, align 4
  call void (i32, i32*, i8*, ...) @_lfortran_file_write(i32 1, i32* %3, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @4, i32 0, i32 0), i32 35, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @3, i32 0, i32 0))
  call void @_lfortran_close(i32 1)
  ret i32 0
}

declare void @_lpython_call_initial_functions(i32, i8**)

declare i64 @_lfortran_open(i32, i8*, i8*, i8*)

declare void @_lfortran_file_write(i32, i32*, i8*, ...)

declare void @_lfortran_close(i32)

[gxyd]

@certik , could you please help me with this issue? I'm not able to understand for why this doesn't work. When passed an integer, it doesn't even enter execution of runtime _lfortran_file_write, do you think there is any issue in the signature of the generated LLVM IR? (it seems alright to me).