luatex 1.20.1

MiKTeX · Jan 5, 2025 · da4d552 · da4d552
1 parent c52a6da
commit da4d552
Show file tree

Hide file tree

Showing 6 changed files with 41 additions and 24 deletions.
diff --git a/Admin/TPM/windows-x64/miktex-luatex-bin-x64.tpm.in b/Admin/TPM/windows-x64/miktex-luatex-bin-x64.tpm.in
@@ -6,7 +6,7 @@
     <TPM:Title>LuaTeX and LuaHBTeX, Windows x64</TPM:Title>
     <TPM:Copyright owner="Taco Hoekwater and the LuaTeX Team" year="2024"/>
     <TPM:License type="gpl2"/>
-    <TPM:Version>1.20.0</TPM:Version>
+    <TPM:Version>1.20.1</TPM:Version>
     <TPM:TargetSystem minVersion="@MIKTEX_MIN_TARGET_SYSTEM_VERSION@">windows-x64</TPM:TargetSystem>
     <TPM:Date>@MIKTEX_DATETIME_STR@</TPM:Date>
     <TPM:Description>

diff --git a/CHANGELOG.md b/CHANGELOG.md
@@ -9,7 +9,7 @@
 * dvips 2024.1
 * dvisvgm 3.4.2
 * hitex 2.1
-* luatex 1.20.0
+* luatex 1.20.1
 * upmendex 1.10
 
 ## 24.12 - 2024-12-23

diff --git a/Programs/TeXAndFriends/luatex/miktex-luatex-version.h b/Programs/TeXAndFriends/luatex/miktex-luatex-version.h
@@ -14,7 +14,7 @@
 #define MIKTEX_COMP_MINOR_VERSION 22
 #define MIKTEX_COMP_PATCH_VERSION 0
 
-#define MIKTEX_COMP_ORIG_VERSION_STR "1.20.0"
+#define MIKTEX_COMP_ORIG_VERSION_STR "1.20.1"
 
 #define MIKTEX_COMP_COPYRIGHT_STR "© 2024 Taco Hoekwater and the LuaTeX Team"
 #define MIKTEX_COMP_TM_STR "TeX is a trademark of the American Mathematical Society. METAFONT is a trademark of Addison-Wesley Publishing Company. PostScript is a trademark of Adobe Systems Incorporated."

diff --git a/Programs/TeXAndFriends/luatex/source/luaffi/ffi.h b/Programs/TeXAndFriends/luatex/source/luaffi/ffi.h
@@ -44,11 +44,27 @@ extern "C" {
 
 #if __STDC_VERSION__+0 >= 199901L
 
+#if ( defined( _WIN32) || defined(__FreeBSD__) || defined(__NetBSD__) || defined(__bsdi__) || defined(__DragonFly__))
+/* We should include something equivalent to */
+/* complex.h                                 */
+/* e.g. Mingw GCC >=10 should have complex functions builtin */
+/* and we can check them with the macro __has_include */
+#if (__GNUC__ >= 10)
+# if defined __has_include
+#  if __has_include (<complex.h>)
+#    include <complex.h>
+#    define HAVE_COMPLEX
+#    define HAVE_LONG_DOUBLE
+#  endif
+# endif
+#endif 
+#else
 #include <complex.h>
 #define HAVE_COMPLEX
 #define HAVE_LONG_DOUBLE
-
 #endif
+#endif
+
 
 #ifndef NDEBUG
 #define DASM_CHECKS
@@ -121,13 +137,18 @@ struct jit;
 #if defined ARCH_X86 || defined ARCH_X64
 #define ALLOW_MISALIGNED_ACCESS
 #endif
-#ifdef OS_WIN
-#define ALWAYS_INLINE __forceinline
-#elif defined(__GNUC__)
-#define ALWAYS_INLINE __attribute__ ((always_inline))
-#else
+
+/* #ifdef OS_WIN */
+/* #define ALWAYS_INLINE __forceinline */
+/* #elif defined(__GNUC__) */
+/* #define ALWAYS_INLINE __attribute__ ((always_inline)) */
+/* #else */
+/* #define ALWAYS_INLINE inline */
+/* #endif */
+
 #define ALWAYS_INLINE inline
-#endif
+
+
 EXTERN_C EXPORT int luaopen_ffi(lua_State* L);
 
 static int lua_absindex2(lua_State* L, int idx) {
@@ -463,18 +484,12 @@ static ALWAYS_INLINE complex_float mk_complex_float(double real, double imag) {
     return real + imag * 1i;
 }
 #endif
-/* static ALWAYS_INLINE complex_double mk_complex_double(double real, double imag) { */
-/*       return (complex_double){real , imag }; */
-/* } */
-/* static ALWAYS_INLINE complex_float mk_complex_float(double real, double imag) { */
-/*       return (complex_float){real , imag}; */
-/* } */
 
-
-extern float cimagf(complex_float);
-extern float crealf(complex_float);
-extern double cimag(complex_double);
-extern double creal(complex_double);
+/* AlpineLinux musl doesn't like them */
+/* extern float cimagf(complex_float); */
+/* extern float crealf(complex_float); */
+/* extern double cimag(complex_double); */
+/* extern double creal(complex_double); */
 
 
 #if defined(OS_ANDROID) && __ANDROID_API__<26
@@ -514,6 +529,7 @@ static ALWAYS_INLINE complex_double mk_complex_double(double real, double imag)
 static ALWAYS_INLINE complex_float mk_complex_float(double real, double imag) {
     return (complex_float){ real, imag };
 }
+
 static ALWAYS_INLINE double creal(complex_double c) {
     return c.real;
 }
@@ -544,6 +560,7 @@ static complex_double cpow(complex_double f, complex_double s) {
     r = exp(f.real);
     return (complex_double) {r*cos(f.imag),r*sin(f.imag)};
 }
+
 #endif
 
 #define CALLBACK_FUNC_USR_IDX 1

diff --git a/Programs/TeXAndFriends/luatex/source/luatex.c b/Programs/TeXAndFriends/luatex/source/luatex.c
@@ -33,8 +33,8 @@
 */
 
 int luatex_version = 120;
-int luatex_revision = '0';
-const char *luatex_version_string = "1.20.0";
+int luatex_revision = '1';
+const char *luatex_version_string = "1.20.1";
 const char *engine_name = my_name;
 
 #include <kpathsea/c-ctype.h>

diff --git a/Programs/TeXAndFriends/luatex/source/luatex_svnversion.h b/Programs/TeXAndFriends/luatex/source/luatex_svnversion.h
@@ -1,4 +1,4 @@
 #ifndef luatex_svn_revision_h
 #define luatex_svn_revision_h
-#define luatex_svn_revision 7635
+#define luatex_svn_revision 7636
 #endif