+2013-07-21 OndÅ\99ej BÃlka <neleai@seznam.cz>
+
+ * gcc-interface/gigi.h: Likewise.
+ * gcc-interface/trans.c: Likewise.
+ * gcc-interface/utils2.c: Likewise.
+ * gnat_rm.texi: Likewise.
+ * gnat_ugn.texi: Likewise.
+ * raise-gcc.c: Likewise.
+ * sigtramp-ppcvxw.c: Likewise.
+ * sysdep.c: Likewise.
+ * terminals.c: Likewise.
+
2013-07-20 Eric Botcazou <ebotcazou@adacore.com>
PR ada/57934
}
#endif
-/* Let code know whether we are targetting VMS without need of
+/* Let code know whether we are targeting VMS without need of
intrusive preprocessor directives. */
#ifndef TARGET_ABI_OPEN_VMS
#define TARGET_ABI_OPEN_VMS 0
instead. */
#define ALLOCA_THRESHOLD 1000
-/* Let code below know whether we are targetting VMS without need of
+/* Let code below know whether we are targeting VMS without need of
intrusive preprocessor directives. */
#ifndef TARGET_ABI_OPEN_VMS
#define TARGET_ABI_OPEN_VMS 0
/* Pick the GNAT node of which we'll take the sloc to assign to the GCC node
end_locus when there is one. We consider only GNAT nodes with a possible
End_Label attached. If the End_Label actually was unassigned, fallback
- on the orginal node. We'd better assign an explicit sloc associated with
+ on the original node. We'd better assign an explicit sloc associated with
the outer construct in any case. */
switch (Nkind (gnat_node))
{
tree new_field;
- /* First loop thru normal components. */
+ /* First loop through normal components. */
for (new_field = TYPE_FIELDS (record_type);
new_field;
new_field = DECL_CHAIN (new_field))
break;
/* Next, see if we're looking for an inherited component in an extension.
- If so, look thru the extension directly, but not if the type contains
+ If so, look through the extension directly, but not if the type contains
a placeholder, as it might be needed for a later substitution. */
if (!new_field
&& TREE_CODE (record_variable) == VIEW_CONVERT_EXPR
return ref;
}
- /* Next, loop thru DECL_INTERNAL_P components if we haven't found the
+ /* Next, loop through DECL_INTERNAL_P components if we haven't found the
component in the first search. Doing this search in two steps is
required to avoid hidden homonymous fields in the _Parent field. */
if (!new_field)
Note that the @code{Source_Location} argument specifies which of a set of
similarly named entities is being eliminated, dealing both with overloading,
-and also appearence of the same entity name in different scopes.
+and also appearance of the same entity name in different scopes.
This pragma indicates that the given entity is not used in the program to be
compiled and built. The effect of the pragma is to allow the compiler to
The above use of patterns to match the message applies only to warning
messages generated by the front end. This form of the pragma with a
string argument can also be used to control back end warnings controlled
-by a "-Wxxx" switch. Such warnings can be identified by the appearence
+by a "-Wxxx" switch. Such warnings can be identified by the appearance
of a string of the form "[-Wxxx]" in the message which identifies the
"-W" switch that controls the message. By using the text of the
"-W" switch in the pragma, such back end warnings can be turned on and off.
Note that in the case of GNAT running
on a platform that supports HP Ada 83, a higher degree of compatibility
-can be guaranteed, and in particular records are layed out in an identical
+can be guaranteed, and in particular records are laid out in an identical
manner in the two compilers. Note also that if output from two different
compilers is mixed, the program is responsible for dealing with elaboration
issues. Probably the safest approach is to write the main program in the
@noindent
To deal with the portability issue, and with the problem of
-mathematical versus run-time intepretation of the expressions in
+mathematical versus run-time interpretation of the expressions in
assertions, GNAT provides comprehensive control over the handling
of intermediate overflow. GNAT can operate in three modes, and
furthemore, permits separate selection of operating modes for
If it is determined that indeed an action should be taken, that
is, if one action filter matches the exception being propagated,
- then control should be transfered to landing-pad.
+ then control should be transferred to landing-pad.
A null first-action-index indicates that there are only cleanups
to run there.
#define REGNO_PC 67 /* ARG_POINTER_REGNUM */
-/* asm string contruction helpers. */
+/* asm string construction helpers. */
#define STR(TEXT) #TEXT
/* stringify expanded TEXT, surrounding it with double quotes. */
&& SystemTimeToTzSpecificLocalTime (&tzi, &utc_sys_time, &local_sys_time)
&& SystemTimeToFileTime (&local_sys_time, &local_time.ft_time);
- /* An error has occured, return invalid_tzoff */
+ /* An error has occurred, return invalid_tzoff */
if (!status) {
*off = __gnat_invalid_tzoff;
Note that using backslash to escape embedded quotes requires
additional special handling if an embedded quote is already
- preceeded by backslash, or if an arg requiring quoting ends with
+ preceded by backslash, or if an arg requiring quoting ends with
backslash. In such cases, the run of escape characters needs to be
doubled. For consistency, we apply this special handling as long
as the escape character is not quote.
#endif
#ifdef TIOCSCTTY
- /* make the tty the controling terminal */
+ /* make the tty the controlling terminal */
status = ioctl (desc->slave_fd, TIOCSCTTY, 0);
#endif
return kill (desc->child_pid, SIGKILL);
}
-/* __gnat_tty_waitpid - wait for the child proces to die
+/* __gnat_tty_waitpid - wait for the child process to die
*
* PARAMETERS
* desc pty_desc structure