add comments

ripley · ripley · commit 60d7992fcea1 · 2025-03-02T09:55:43.000Z
git-svn-id: https://svn.r-project.org/R/trunk@87865 00db46b3-68df-0310-9c12-caf00c1e9a41
diff --git a/src/main/platform.c b/src/main/platform.c
@@ -2572,7 +2572,7 @@ attribute_hidden SEXP do_capabilities(SEXP call, SEXP op, SEXP args, SEXP rho)
 	LOGICAL(ans)[i] = TRUE;  /* also AQUA ? */
     } else {
 #if defined(HAVE_LIBREADLINE)
-	extern Rboolean UsingReadline;
+	extern Rboolean UsingReadline; // from ../unix/system.c
 	if (R_Interactive && UsingReadline) LOGICAL(ans)[i] = TRUE;
 #endif
     }
diff --git a/src/unix/X11.c b/src/unix/X11.c
@@ -62,6 +62,7 @@ attribute_hidden int R_X11_Init(void)
     return initialized;
 }
 
+/* used in src/main/platform.c */
 attribute_hidden Rboolean R_access_X11(void)
 {
     R_X11_Init();

Original file line number	Diff line number	Diff line change
`@@ -2572,7 +2572,7 @@ attribute_hidden SEXP do_capabilities(SEXP call, SEXP op, SEXP args, SEXP rho)`
`2572`	`2572`	`LOGICAL(ans)[i] = TRUE; /* also AQUA ? */`
`2573`	`2573`	`} else {`
`2574`	`2574`	`#if defined(HAVE_LIBREADLINE)`
`2575`		`- extern Rboolean UsingReadline;`
	`2575`	`+ extern Rboolean UsingReadline; // from ../unix/system.c`
`2576`	`2576`	`if (R_Interactive && UsingReadline) LOGICAL(ans)[i] = TRUE;`
`2577`	`2577`	`#endif`
`2578`	`2578`	`}`
Original file line number	Diff line number	Diff line change
`@@ -62,6 +62,7 @@ attribute_hidden int R_X11_Init(void)`
`62`	`62`	`return initialized;`
`63`	`63`	`}`
`64`	`64`
	`65`	`+/* used in src/main/platform.c */`
`65`	`66`	`attribute_hidden Rboolean R_access_X11(void)`
`66`	`67`	`{`
`67`	`68`	`R_X11_Init();`