diff --git a/CMakeLists.txt b/CMakeLists.txt index 95f9c573..ca404c10 100644 --- a/CMakeLists.txt +++ b/CMakeLists.txt @@ -25,7 +25,7 @@ cmake_minimum_required(VERSION 3.12) project (PFUNIT - VERSION 4.6.2 + VERSION 4.6.3 LANGUAGES Fortran C) # Determine if pFUnit is built as a subproject (using diff --git a/ChangeLog.md b/ChangeLog.md index 11aa7054..b021ffc1 100644 --- a/ChangeLog.md +++ b/ChangeLog.md @@ -5,6 +5,12 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0 ## [Unreleased] +## [4.6.3] - 2023-02-07 + +### Fixed + +- Fix for compilers that do not support 128 bit reals + ## [4.6.2] - 2023-01-23 ### Fixed diff --git a/src/funit/fhamcrest/BaseDescription.F90 b/src/funit/fhamcrest/BaseDescription.F90 index 0eda5a42..acc72857 100644 --- a/src/funit/fhamcrest/BaseDescription.F90 +++ b/src/funit/fhamcrest/BaseDescription.F90 @@ -40,10 +40,14 @@ end subroutine append_character module procedure description_of_int64 module procedure description_of_real32 module procedure description_of_real64 +#if (defined(_ISO_REAL128) && (_ISO_REAL128 != _REAL_DEFAULT_KIND) && (_ISO_REAL128 != _DOUBLE_DEFAULT_KIND)) module procedure description_of_real128 +#endif module procedure description_of_complex32 module procedure description_of_complex64 +#if (defined(_ISO_REAL128) && (_ISO_REAL128 != _REAL_DEFAULT_KIND) && (_ISO_REAL128 != _DOUBLE_DEFAULT_KIND)) module procedure description_of_complex128 +#endif end interface description_of contains