added rcsid

1984-07-12 14:07:14 +00:00
parent 10b9e1a748
commit 1eaf02a3e1
7 changed files with 11 additions and 2 deletions
--- a/lang/pc/test/machar.p
+++ b/lang/pc/test/machar.p
@@ -1,3 +1,5 @@
+{ $Header$ }
+
 procedure machar (var ibeta , it , irnd , ngrd , machep , negep , iexp,
  minexp , maxexp : integer ; var eps , epsneg , xmin , xmax : real ) ;
 var trapped:boolean;