1.1 --- a/templates/progops.c	Mon Jun 25 14:27:00 2018 +0200
     1.2 +++ b/templates/progops.c	Mon Jul 02 17:53:15 2018 +0200
     1.3 @@ -1,6 +1,6 @@
     1.4  /* Operations depending on program specifics.
     1.5  
     1.6 -Copyright (C) 2015, 2016, 2017 Paul Boddie <paul@boddie.org.uk>
     1.7 +Copyright (C) 2015, 2016, 2017, 2018 Paul Boddie <paul@boddie.org.uk>
     1.8  
     1.9  This program is free software; you can redistribute it and/or modify it under
    1.10  the terms of the GNU General Public License as published by the Free Software
    1.11 @@ -301,7 +301,9 @@
    1.12  {
    1.13      /* Invoke the bool function with the object and test against True. */
    1.14  
    1.15 -    return __VALUE(attr) == &__predefined___builtins___boolean_True ? 1 :
    1.16 -           __VALUE(attr) == &__predefined___builtins___boolean_False ? 0 :
    1.17 +    __ref value = __VALUE(attr);
    1.18 +
    1.19 +    return value == &__predefined___builtins___boolean_True ? 1 :
    1.20 +           value == &__predefined___builtins___boolean_False ? 0 :
    1.21             __VALUE(__fn___builtins___boolean_bool(__NULL, attr)) == &__predefined___builtins___boolean_True;
    1.22  }