From 876f16240d138e8efdb47939f906d4fcfa234fdb Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Mon, 18 Apr 2016 12:52:05 +0200 Subject: [multiple changes] 2016-04-18 Gary Dismukes * sem_ch13.adb (Has_Good_Profile): Improvement of error message. Now indicates subtype_mark of formal parameter rather than the formal's name, plus minor rewording. 2016-04-18 Pascal Obry * adaint.c, adaint.h, s-os_lib.ads: Add new routine Current_Process_Id. From-SVN: r235128 --- gcc/ada/adaint.h | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'gcc/ada/adaint.h') diff --git a/gcc/ada/adaint.h b/gcc/ada/adaint.h index 09fc83c..5df1926 100644 --- a/gcc/ada/adaint.h +++ b/gcc/ada/adaint.h @@ -206,8 +206,9 @@ extern int __gnat_is_symbolic_link (char *name); extern int __gnat_portable_spawn (char *[]); extern int __gnat_portable_no_block_spawn (char *[]); extern int __gnat_portable_wait (int *); +extern int __gnat_current_process_id (void); extern char *__gnat_locate_exec (char *, char *); -extern char *__gnat_locate_exec_on_path (char *); +extern char *__gnat_locate_exec_on_path (char *); extern char *__gnat_locate_regular_file (char *, char *); extern void __gnat_maybe_glob_args (int *, char ***); extern void __gnat_os_exit (int); -- cgit v1.1