mirror of
https://github.com/fosslinux/live-bootstrap.git
synced 2026-03-23 11:36:32 +01:00
45 lines
1.3 KiB
Diff
45 lines
1.3 KiB
Diff
--- guile-2.2.4/libguile/posix.c
|
|
+++ guile-2.2.4/libguile/posix.c
|
|
@@ -2356,6 +2356,8 @@
|
|
#endif
|
|
#ifdef WAIT_ANY
|
|
scm_c_define ("WAIT_ANY", scm_from_int (WAIT_ANY));
|
|
+#else
|
|
+ scm_c_define ("WAIT_ANY", scm_from_int (-1));
|
|
#endif
|
|
#ifdef WAIT_MYPGRP
|
|
scm_c_define ("WAIT_MYPGRP", scm_from_int (WAIT_MYPGRP));
|
|
@@ -2390,21 +2392,33 @@
|
|
#endif
|
|
#ifdef LC_PAPER
|
|
scm_c_define ("LC_PAPER", scm_from_int (LC_PAPER));
|
|
+#else
|
|
+ scm_c_define ("LC_PAPER", scm_from_int (7));
|
|
#endif
|
|
#ifdef LC_NAME
|
|
scm_c_define ("LC_NAME", scm_from_int (LC_NAME));
|
|
+#else
|
|
+ scm_c_define ("LC_NAME", scm_from_int (8));
|
|
#endif
|
|
#ifdef LC_ADDRESS
|
|
scm_c_define ("LC_ADDRESS", scm_from_int (LC_ADDRESS));
|
|
+#else
|
|
+ scm_c_define ("LC_ADDRESS", scm_from_int (9));
|
|
#endif
|
|
#ifdef LC_TELEPHONE
|
|
scm_c_define ("LC_TELEPHONE", scm_from_int (LC_TELEPHONE));
|
|
+#else
|
|
+ scm_c_define ("LC_TELEPHONE", scm_from_int (10));
|
|
#endif
|
|
#ifdef LC_MEASUREMENT
|
|
scm_c_define ("LC_MEASUREMENT", scm_from_int (LC_MEASUREMENT));
|
|
+#else
|
|
+ scm_c_define ("LC_MEASUREMENT", scm_from_int (11));
|
|
#endif
|
|
#ifdef LC_IDENTIFICATION
|
|
scm_c_define ("LC_IDENTIFICATION", scm_from_int (LC_IDENTIFICATION));
|
|
+#else
|
|
+ scm_c_define ("LC_IDENTIFICATION", scm_from_int (12));
|
|
#endif
|
|
#ifdef PIPE_BUF
|
|
scm_c_define ("PIPE_BUF", scm_from_long (PIPE_BUF));
|