Skip to content

Issue on page /sr_fortran_walkthrough.html #784

@TomMelt

Description

@TomMelt

In the docs you use result and return_code. Whilst fortran doesn't have reserved words, result does have special meaning. So it's probably best to change the bottom example from result to return_code

For example,

program example
  use smartredis_client, only : client_type

  type(client_type) :: client
  integer :: return_code

  return_code = client%initialize(.false.) ! Change .false. to true if using a clustered database
  if (return_code .ne. SRNoError) stop 'Error in initializing client'
end program example

followed by this example:

  call random_number(send_array_real_64)

  ! Initialize a client
  result = client%initialize("smartredis_put_get_3D")
  if (result .ne. SRNoError) error stop 'client%initialize failed'

  ! Send a tensor to the database via the client and verify that we can retrieve it
  result = client%put_tensor("send_array", send_array_real_64, shape(send_array_real_64))
  if (result .ne. SRNoError) error stop 'client%put_tensor failed'

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    No type

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions