suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Windows: long double fix for MSVC 2013

Browse Source
This commit is contained in:
Matthew Flatt 2014-06-16 10:23:16 +01:00
parent cee00a1c6e
commit 4f96f6fe62
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/racket/src/number.c
View File

@ -428,7 +428,7 @@ scheme_init_number (Scheme_Env *env)
#ifdef MZ_LONG_DOUBLE
scheme_long_floating_point_zero = get_long_double_zero();
#if defined(HUGE_VALL) && !defined(USE_DIVIDE_MAKE_INFINITY)
#if defined(HUGE_VALL) && !defined(USE_DIVIDE_MAKE_INFINITY) && !defined(MZ_LONG_DOUBLE_API_IS_EXTERNAL)
scheme_long_infinity_val = HUGE_VALL;
#else
#ifndef USE_LONG_INFINITY_FUNC