This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
amigaos4: use the AmigaOS pager
[perl5.git] / amigaos4 / amigaos.h
index 2f6d4b2..0faff80 100644 (file)
@@ -41,16 +41,23 @@ char *mystrdup(const char *s);
 char *convert_path_u2a(const char *filename);
 char *convert_path_a2u(const char *filename);
 
-/* signal.h */
+/* Need Pid_t define to make amigaos.c compile without including config.h */
+#ifndef Pid_t
+#define Pid_t pid_t
+#endif
+
+int amigaos_kill(Pid_t pid, int  signal);
 
-// #define SIGQUIT SIGABRT
+#define kill(a,b) amigaos_kill((a),(b))
 
 void ___makeenviron() __attribute__((constructor));
 void ___freeenviron() __attribute__((destructor));
 
 long amigaos_get_file(int fd);
 
-// BOOL constructed;
+void amigaos4_init_fork_array();
+void amigaos4_dispose_fork_array();
+void amigaos4_init_environ_sema();
 
 /* emulated flock stuff */