<pre style='margin:0'>
Renee Otten (reneeotten) pushed a commit to branch master
in repository macports-ports.

</pre>
<p><a href="https://github.com/macports/macports-ports/commit/deaa1f7a474fa7e8be2473a90517f5765d3c267f">https://github.com/macports/macports-ports/commit/deaa1f7a474fa7e8be2473a90517f5765d3c267f</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit deaa1f7a474fa7e8be2473a90517f5765d3c267f
</span>Author: Tomas Volf <~@wolfsden.cz>
AuthorDate: Mon Aug 12 11:27:38 2024 +0200

<span style='display:block; white-space:pre;color:#404040;'>    guile-1.8: New port.
</span><span style='display:block; white-space:pre;color:#404040;'>    
</span><span style='display:block; white-space:pre;color:#404040;'>    Based on guile18 with some modifications (for example preserving the info
</span><span style='display:block; white-space:pre;color:#404040;'>    pages).
</span>---
 lang/guile-1.8/Portfile                            | 164 +++++++++++++++++++++
 lang/{guile18 => guile-1.8}/files/endl.patch       |   0
 lang/guile-1.8/files/guile-1.8                     |  21 +++
 .../files/patch-libguile-fports.c.diff             |   0
 .../files/patch-no-stack-checking.diff             |   0
 .../files/patch-srfi-60.c.diff                     |   0
 6 files changed, 185 insertions(+)

<span style='display:block; white-space:pre;color:#808080;'>diff --git a/lang/guile-1.8/Portfile b/lang/guile-1.8/Portfile
</span>new file mode 100644
<span style='display:block; white-space:pre;color:#808080;'>index 00000000000..778b4dd285e
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>--- /dev/null
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/lang/guile-1.8/Portfile
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -0,0 +1,164 @@
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# -*- coding: utf-8; mode: tcl; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- vim:fenc=utf-8:ft=tcl:et:sw=4:ts=4:sts=4
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+PortSystem 1.0
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+PortGroup  muniversal 1.0
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+PortGroup   select 1.0
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+name               guile-1.8
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+version            1.8.8
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+revision    8
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+categories lang
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+maintainers        nomaintainer
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+platforms  darwin
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+license     LGPL-2.1+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+description        GNU's Ubiquitous Intelligent Language for Extension (guile)
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+long_description   \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           Guile is an interpreter for the Scheme programming      \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           language, packaged for use in a wide variety of         \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           environments. Guile implements Scheme as described in   \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           the Revised^5 Report on the Algorithmic Language Scheme \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           (usually known as R5RS), providing clean and general    \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           data and control structures.                            \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                                                                   \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           Guile goes beyond the rather austere language presented \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           in R5RS, extending it with a module system, full access \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           to POSIX system calls, networking support, multiple     \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           threads, dynamic linking, a foreign function call       \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           interface, powerful string processing, and many other   \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           features needed for programming in the real world.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+#user_notes        You may need to set the environment variable            \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+#          DYLD_LIBRARY_PATH to ${prefix}/lib (or wherever         \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+#          the guile libraries have been installed) if you want    \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+#          to load guile modules from an application linked with   \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+#          libguile.  This should only apply to developers using   \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+#          guile as an extension language.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+distname        guile-${version}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+homepage   https://www.gnu.org/software/guile/guile.html
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+master_sites       gnu:guile
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+checksums       md5     18661a8fdfef13e2fcb7651720aa53f3 \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                sha1    548d6927aeda332b117f8fc5e4e82c39a05704f9 \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                rmd160  8ac185a72ad8394b14d5377549e5bbf02889faaa
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+patchfiles patch-srfi-60.c.diff \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           patch-libguile-fports.c.diff \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           patch-no-stack-checking.diff \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+           endl.patch
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+depends_lib        port:readline \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                port:gettext \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                port:libiconv \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                port:libtool \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+                port:gmp
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+depends_run-append  port:guile_select
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# guile-using applications may need to set DYLD_LIBRARY_PATH to the guile
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# library path so they can be loaded at runtime. They should not use
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# ${prefix}/lib because this includes other MacPorts libraries that they may not
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# wish to load instead. Accordingly, we install guile libraries into
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# ${prefix}/lib/${name}. For compatibility, we symlink everything back into
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# ${prefix}/lib.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# See https://trac.macports.org/ticket/52494
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+#
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# Note: I removed the compatibility symlinks.  The dependent ports should just
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+#       be fixed.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+configure.args                               \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    --program-suffix=-1.8                    \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    --infodir="${prefix}/share/info/${name}" \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    --mandir="${prefix}/share/man"           \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    --enable-regex                           \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    --disable-error-on-warning               \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    --includedir ${prefix}/include/${name}   \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    --libdir ${prefix}/lib/${name}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# guile-1.8.pc should be installed into the ${prefix}/lib/pkgconfig, but it
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# defaults to libdir.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+destroot.args-append pkgconfigdir=${prefix}/lib/pkgconfig
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+post-patch {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    # This changes configure to do what the author actually intended based on their comments
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    reinplace "s|-Werror -Wmissing-braces|-Werror=missing-braces|" ${worksrcpath}/configure
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+# Unable to cross compile, so we need to be able to run the built code
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+if {${os.arch} eq "i386" && ${os.major} >= 11} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    supported_archs i386 x86_64
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set universal_archs_supported {i386 x86_64}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+} elseif {${os.arch} eq "i386" && ${build_arch} eq "x86_64"} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    supported_archs i386 x86_64 ppc
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set universal_archs_supported {i386 x86_64 ppc}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+} elseif {${os.arch} eq "i386"} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    supported_archs i386 ppc
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set universal_archs_supported {i386 ppc}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+} elseif {${build_arch} eq "ppc64"} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    supported_archs ppc ppc64
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set universal_archs_supported {ppc ppc64}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+} else {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    supported_archs ${build_arch}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    set universal_archs_supported ${build_arch}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+platform darwin {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    if {${universal_possible} && [variant_isset universal]} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set merger_host(x86_64) x86_64-apple-${os.platform}${os.major}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set merger_host(i386) i686-apple-${os.platform}${os.major}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set merger_host(ppc64) powerpc64-apple-${os.platform}${os.major}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set merger_host(ppc) powerpc-apple-${os.platform}${os.major}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set merger_configure_args(x86_64) "--build=x86_64-apple-${os.platform}${os.major}"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set merger_configure_args(i386) "--build=i686-apple-${os.platform}${os.major}"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set merger_configure_args(ppc) "--build=powerpc-apple-${os.platform}${os.major}"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        set merger_configure_args(ppc64) "--build=powerpc64-apple-${os.platform}${os.major}"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    } elseif {${build_arch} eq "i386"} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        configure.args-append \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            --host=i686-apple-${os.platform}${os.major} \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            --build=i686-apple-${os.platform}${os.major}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    } elseif {${build_arch} eq "x86_64"} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        configure.args-append \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            --host=x86_64-apple-${os.platform}${os.major} \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            --build=x86_64-apple-${os.platform}${os.major}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    } elseif {${build_arch} eq "ppc"} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        configure.args-append \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            --host=powerpc-apple-${os.platform}${os.major} \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            --build=powerpc-apple-${os.platform}${os.major}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    } elseif {${build_arch} eq "ppc64"} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        configure.args-append \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            --host=powerpc64-apple-${os.platform}${os.major} \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+            --build=powerpc64-apple-${os.platform}${os.major}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    }
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+set merger_dont_diff "${prefix}/include/libguile/scmconfig.h"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+post-destroot {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    move ${destroot}${prefix}/share/aclocal/guile.m4 \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        ${destroot}${prefix}/share/aclocal/${name}.m4
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    reinplace "s|${prefix}/bin/guile|${prefix}/bin/guile-1.8|g" \
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        ${destroot}${prefix}/bin/guile-config-1.8
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    # Ensure that in case there is 8th part the build fails.  When that
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    # happens, update the select file.
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    if {[file exists ${destroot}${prefix}/share/info/${name}/guile.info-8 ]} {
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        ui_error "Additional part of info page available."
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+        return -code error
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+    }
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+livecheck.type  regex
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+livecheck.url   "https://ftp.gnu.org/pub/gnu/guile/?C=N;O=D"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+livecheck.regex {guile-(1\.8(?:\.\d+)*)}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+select.group    guile
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+select.file     ${name}
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+notes "
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+To make the Guile ${version} default one, run:
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+port select --set ${select.group} [file tail ${select.file}]
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+"
</span><span style='display:block; white-space:pre;color:#808080;'>diff --git a/lang/guile18/files/endl.patch b/lang/guile-1.8/files/endl.patch
</span>similarity index 100%
rename from lang/guile18/files/endl.patch
rename to lang/guile-1.8/files/endl.patch
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/lang/guile-1.8/files/guile-1.8 b/lang/guile-1.8/files/guile-1.8
</span>new file mode 100644
<span style='display:block; white-space:pre;color:#808080;'>index 00000000000..879a6bee248
</span><span style='display:block; white-space:pre;background:#ffe0e0;'>--- /dev/null
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/lang/guile-1.8/files/guile-1.8
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -0,0 +1,21 @@
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+bin/guile-1.8
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+bin/guile-config-1.8
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+bin/guile-snarf-1.8
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+bin/guile-tools-1.8
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/goops.info
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/guile-tut.info
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/guile.info
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/guile.info-1
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/guile.info-2
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/guile.info-3
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/guile.info-4
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/guile.info-5
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/guile.info-6
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/guile.info-7
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+-
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/info/guile-1.8/r5rs.info
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+share/man/man1/guile-1.8.1.gz
</span><span style='display:block; white-space:pre;color:#808080;'>diff --git a/lang/guile18/files/patch-libguile-fports.c.diff b/lang/guile-1.8/files/patch-libguile-fports.c.diff
</span>similarity index 100%
rename from lang/guile18/files/patch-libguile-fports.c.diff
rename to lang/guile-1.8/files/patch-libguile-fports.c.diff
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/lang/guile18/files/patch-no-stack-checking.diff b/lang/guile-1.8/files/patch-no-stack-checking.diff
</span>similarity index 100%
rename from lang/guile18/files/patch-no-stack-checking.diff
rename to lang/guile-1.8/files/patch-no-stack-checking.diff
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/lang/guile18/files/patch-srfi-60.c.diff b/lang/guile-1.8/files/patch-srfi-60.c.diff
</span>similarity index 100%
rename from lang/guile18/files/patch-srfi-60.c.diff
rename to lang/guile-1.8/files/patch-srfi-60.c.diff
</pre><pre style='margin:0'>

</pre>