Skip to content
Merged
Changes from 1 commit
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Prev Previous commit
Next Next commit
use [[maybe_unused]]
  • Loading branch information
khushi-411 committed Sep 13, 2023
commit 22c8474d7171fabfdf63b3afd8c9ec81ead71844
20 changes: 10 additions & 10 deletions src/libasr/runtime/lfortran_intrinsics.c
Original file line number Diff line number Diff line change
Expand Up @@ -1965,7 +1965,7 @@ LFORTRAN_API void _lfortran_rewind(int32_t unit_num)
}


LFORTRAN_API void _lfortran_read_int32(int32_t *p, int32_t unit_num)
LFORTRAN_API void _lfortran_read_int32([[maybe_unused]] int32_t *p, int32_t unit_num)
{
if (unit_num == -1) {
// Read from stdin
Expand All @@ -1987,7 +1987,7 @@ LFORTRAN_API void _lfortran_read_int32(int32_t *p, int32_t unit_num)
}
}

LFORTRAN_API void _lfortran_read_int64(int64_t *p, int32_t unit_num)
LFORTRAN_API void _lfortran_read_int64([[maybe_unused]] int64_t *p, int32_t unit_num)
{
if (unit_num == -1) {
// Read from stdin
Expand Down Expand Up @@ -2021,7 +2021,7 @@ LFORTRAN_API void _lfortran_read_int64(int64_t *p, int32_t unit_num)
}
}

LFORTRAN_API void _lfortran_read_array_int8(int8_t *p, int array_size, int32_t unit_num)
LFORTRAN_API void _lfortran_read_array_int8([[maybe_unused]] int8_t *p, int array_size, int32_t unit_num)
{
if (unit_num == -1) {
// Read from stdin
Expand All @@ -2047,7 +2047,7 @@ LFORTRAN_API void _lfortran_read_array_int8(int8_t *p, int array_size, int32_t u
}
}

LFORTRAN_API void _lfortran_read_array_int32(int32_t *p, int array_size, int32_t unit_num)
LFORTRAN_API void _lfortran_read_array_int32([[maybe_unused]] int32_t *p, int array_size, int32_t unit_num)
{
if (unit_num == -1) {
// Read from stdin
Expand All @@ -2073,7 +2073,7 @@ LFORTRAN_API void _lfortran_read_array_int32(int32_t *p, int array_size, int32_t
}
}

LFORTRAN_API void _lfortran_read_char(char **p, int32_t unit_num)
LFORTRAN_API void _lfortran_read_char([[maybe_unused]] char **p, int32_t unit_num)
{
if (unit_num == -1) {
// Read from stdin
Expand All @@ -2098,7 +2098,7 @@ LFORTRAN_API void _lfortran_read_char(char **p, int32_t unit_num)
}
}

LFORTRAN_API void _lfortran_read_float(float *p, int32_t unit_num)
LFORTRAN_API void _lfortran_read_float([[maybe_unused]] float *p, int32_t unit_num)
{
if (unit_num == -1) {
// Read from stdin
Expand All @@ -2120,7 +2120,7 @@ LFORTRAN_API void _lfortran_read_float(float *p, int32_t unit_num)
}
}

LFORTRAN_API void _lfortran_read_array_float(float *p, int array_size, int32_t unit_num)
LFORTRAN_API void _lfortran_read_array_float([[maybe_unused]] float *p, int array_size, int32_t unit_num)
{
if (unit_num == -1) {
// Read from stdin
Expand All @@ -2146,7 +2146,7 @@ LFORTRAN_API void _lfortran_read_array_float(float *p, int array_size, int32_t u
}
}

LFORTRAN_API void _lfortran_read_array_double(double *p, int array_size, int32_t unit_num)
LFORTRAN_API void _lfortran_read_array_double([[maybe_unused]] double *p, int array_size, int32_t unit_num)
{
if (unit_num == -1) {
// Read from stdin
Expand All @@ -2172,7 +2172,7 @@ LFORTRAN_API void _lfortran_read_array_double(double *p, int array_size, int32_t
}
}

LFORTRAN_API void _lfortran_read_array_char(char **p, int array_size, int32_t unit_num)
LFORTRAN_API void _lfortran_read_array_char([[maybe_unused]] char **p, int array_size, int32_t unit_num)
{
if (unit_num == -1) {
// Read from stdin
Expand Down Expand Up @@ -2202,7 +2202,7 @@ LFORTRAN_API void _lfortran_read_array_char(char **p, int array_size, int32_t un
}
}

LFORTRAN_API void _lfortran_read_double(double *p, int32_t unit_num)
LFORTRAN_API void _lfortran_read_double([[maybe_unused]] double *p, int32_t unit_num)
{
if (unit_num == -1) {
// Read from stdin
Expand Down