diff --git a/lang/pc/libpc/cvt.c b/lang/pc/libpc/cvt.c index c1a3bd6c6..07aff23aa 100644 --- a/lang/pc/libpc/cvt.c +++ b/lang/pc/libpc/cvt.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + extern double _fif(); /* diff --git a/lang/pc/libpc/fef.e b/lang/pc/libpc/fef.e index 8620a9df6..cb797034e 100644 --- a/lang/pc/libpc/fef.e +++ b/lang/pc/libpc/fef.e @@ -1,5 +1,22 @@ # ; $Header$ +; +; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. +; +; This product is part of the Amsterdam Compiler Kit. +; +; Permission to use, sell, duplicate or disclose this software must be +; obtained in writing. Requests for such permissions may be sent to +; +; Dr. Andrew S. Tanenbaum +; Wiskundig Seminarium +; Vrije Universiteit +; Postbox 7161 +; 1007 MC Amsterdam +; The Netherlands +; +; + mes 2,EM_WSIZE,EM_PSIZE #define FARG 0 diff --git a/lang/pc/libpc/fif.e b/lang/pc/libpc/fif.e index b8c3d350d..15b9f821b 100644 --- a/lang/pc/libpc/fif.e +++ b/lang/pc/libpc/fif.e @@ -1,5 +1,22 @@ # ; $Header$ +; +; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. +; +; This product is part of the Amsterdam Compiler Kit. +; +; Permission to use, sell, duplicate or disclose this software must be +; obtained in writing. Requests for such permissions may be sent to +; +; Dr. Andrew S. Tanenbaum +; Wiskundig Seminarium +; Vrije Universiteit +; Postbox 7161 +; 1007 MC Amsterdam +; The Netherlands +; +; + mes 2,EM_WSIZE,EM_PSIZE #define ARG1 0 diff --git a/lang/pc/libpc/get.c b/lang/pc/libpc/get.c index b25f3226d..ec8420772 100644 --- a/lang/pc/libpc/get.c +++ b/lang/pc/libpc/get.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include #include diff --git a/lang/pc/libpc/hol0.e b/lang/pc/libpc/hol0.e index 2d5a9a72f..8db66cf7e 100644 --- a/lang/pc/libpc/hol0.e +++ b/lang/pc/libpc/hol0.e @@ -1,6 +1,23 @@ # ; $Header$ +; +; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. +; +; This product is part of the Amsterdam Compiler Kit. +; +; Permission to use, sell, duplicate or disclose this software must be +; obtained in writing. Requests for such permissions may be sent to +; +; Dr. Andrew S. Tanenbaum +; Wiskundig Seminarium +; Vrije Universiteit +; Postbox 7161 +; 1007 MC Amsterdam +; The Netherlands +; +; + mes 2,EM_WSIZE,EM_PSIZE ; _hol0 return the address of the ABS block (hol0) diff --git a/lang/pc/libpc/notext.c b/lang/pc/libpc/notext.c index 4f0cb4593..8a46e5f35 100644 --- a/lang/pc/libpc/notext.c +++ b/lang/pc/libpc/notext.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include notext(f) struct file *f; { diff --git a/lang/pc/libpc/pclose.c b/lang/pc/libpc/pclose.c index 53914623a..88ba88aea 100644 --- a/lang/pc/libpc/pclose.c +++ b/lang/pc/libpc/pclose.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include extern _cls(); diff --git a/lang/pc/libpc/perrno.c b/lang/pc/libpc/perrno.c index fe9b52f71..3cc6a1b6d 100644 --- a/lang/pc/libpc/perrno.c +++ b/lang/pc/libpc/perrno.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + /* function perrno:integer; extern; */ extern int errno; diff --git a/lang/pc/libpc/pexit.c b/lang/pc/libpc/pexit.c index 1051c9230..3a472c2d1 100644 --- a/lang/pc/libpc/pexit.c +++ b/lang/pc/libpc/pexit.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include extern int *_extfl; diff --git a/lang/pc/libpc/put.c b/lang/pc/libpc/put.c index bb9594268..dcc86e196 100644 --- a/lang/pc/libpc/put.c +++ b/lang/pc/libpc/put.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include extern _wf(); diff --git a/lang/pc/libpc/rdc.c b/lang/pc/libpc/rdc.c index c95e2e02b..17f0708a8 100644 --- a/lang/pc/libpc/rdc.c +++ b/lang/pc/libpc/rdc.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include extern _rf(); diff --git a/lang/pc/libpc/rf.c b/lang/pc/libpc/rf.c index 87e1a4ee9..dee966838 100644 --- a/lang/pc/libpc/rf.c +++ b/lang/pc/libpc/rf.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include #include diff --git a/lang/pc/libpc/rln.c b/lang/pc/libpc/rln.c index 19fcff374..16e93c0ce 100644 --- a/lang/pc/libpc/rln.c +++ b/lang/pc/libpc/rln.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include extern _rf(); diff --git a/lang/pc/libpc/rnd.c b/lang/pc/libpc/rnd.c index b2c651bdc..0345caa87 100644 --- a/lang/pc/libpc/rnd.c +++ b/lang/pc/libpc/rnd.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + double _rnd(r) double r; { return(r + (r<0 ? -0.5 : 0.5)); } diff --git a/lang/pc/libpc/sig.e b/lang/pc/libpc/sig.e index 3c8d2634f..d2c2dcff6 100644 --- a/lang/pc/libpc/sig.e +++ b/lang/pc/libpc/sig.e @@ -1,6 +1,23 @@ #define PROC 0 ; $Header$ +; +; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. +; +; This product is part of the Amsterdam Compiler Kit. +; +; Permission to use, sell, duplicate or disclose this software must be +; obtained in writing. Requests for such permissions may be sent to +; +; Dr. Andrew S. Tanenbaum +; Wiskundig Seminarium +; Vrije Universiteit +; Postbox 7161 +; 1007 MC Amsterdam +; The Netherlands +; +; + mes 2,EM_WSIZE,EM_PSIZE ; _sig is called with one parameter: diff --git a/lang/pc/libpc/string.c b/lang/pc/libpc/string.c index 0c3957114..a36f608a0 100644 --- a/lang/pc/libpc/string.c +++ b/lang/pc/libpc/string.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + /* function strbuf(var b:charbuf):string; */ char *strbuf(s) char *s; { diff --git a/lang/pc/libpc/trp.e b/lang/pc/libpc/trp.e index 130344a37..9feb9d87f 100644 --- a/lang/pc/libpc/trp.e +++ b/lang/pc/libpc/trp.e @@ -1,6 +1,23 @@ # ; $Header$ +; +; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. +; +; This product is part of the Amsterdam Compiler Kit. +; +; Permission to use, sell, duplicate or disclose this software must be +; obtained in writing. Requests for such permissions may be sent to +; +; Dr. Andrew S. Tanenbaum +; Wiskundig Seminarium +; Vrije Universiteit +; Postbox 7161 +; 1007 MC Amsterdam +; The Netherlands +; +; + mes 2,EM_WSIZE,EM_PSIZE #define TRAP 0 diff --git a/lang/pc/libpc/uread.c b/lang/pc/libpc/uread.c index 97cd768a5..5e504eb25 100644 --- a/lang/pc/libpc/uread.c +++ b/lang/pc/libpc/uread.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + /* function uread(fd:integer; var b:buf; n:integer):integer; */ extern int read(); diff --git a/lang/pc/libpc/uwrite.c b/lang/pc/libpc/uwrite.c index 0758ccf37..7cf7d557a 100644 --- a/lang/pc/libpc/uwrite.c +++ b/lang/pc/libpc/uwrite.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + /* function uwrite(fd:integer; var b:buf; n:integer):integer; */ extern int write(); diff --git a/lang/pc/libpc/wdw.c b/lang/pc/libpc/wdw.c index b915aa1fd..33ac2f77a 100644 --- a/lang/pc/libpc/wdw.c +++ b/lang/pc/libpc/wdw.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include extern struct file *_curfil; diff --git a/lang/pc/libpc/wf.c b/lang/pc/libpc/wf.c index 1cac6ce3c..cd0f2b9f0 100644 --- a/lang/pc/libpc/wf.c +++ b/lang/pc/libpc/wf.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include #include diff --git a/lang/pc/libpc/wrc.c b/lang/pc/libpc/wrc.c index 4409df909..95b6ea25e 100644 --- a/lang/pc/libpc/wrc.c +++ b/lang/pc/libpc/wrc.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include extern _wf(); diff --git a/lang/pc/libpc/wri.c b/lang/pc/libpc/wri.c index 321c2149c..37bac5aac 100644 --- a/lang/pc/libpc/wri.c +++ b/lang/pc/libpc/wri.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include extern _wstrin(); diff --git a/lang/pc/libpc/wrz.c b/lang/pc/libpc/wrz.c index cbda92e85..3fd341382 100644 --- a/lang/pc/libpc/wrz.c +++ b/lang/pc/libpc/wrz.c @@ -1,4 +1,21 @@ /* $Header$ */ +/* + * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. + * + * This product is part of the Amsterdam Compiler Kit. + * + * Permission to use, sell, duplicate or disclose this software must be + * obtained in writing. Requests for such permissions may be sent to + * + * Dr. Andrew S. Tanenbaum + * Wiskundig Seminarium + * Vrije Universiteit + * Postbox 7161 + * 1007 MC Amsterdam + * The Netherlands + * + */ + #include extern _wss();