CVS difference for ais/ai-50217.txt

--- ais/ai-50217.txt	2004/11/25 03:13:33	1.19
+++ ais/ai-50217.txt	2005/01/28 02:10:57	1.20
@@ -490,7 +490,7 @@
         procedure Assign_Employee(E : in out Employee;
                                   D : access Departments.Department'Class);
         type Dept_Ptr is access all Departments.Department'Class;
-        function Current_Department(D : in Employee) return Dept_Ptr;
+        function Current_Department(E : in Employee) return Dept_Ptr;
         ...
     end Employees;
 
@@ -3905,7 +3905,7 @@
 -----------------
 Thoughts on the implementation of "limited with" in AdaMagic
 
-          $Revision: 1.19 $ $Date: 2004/11/25 03:13:33 $
+          $Revision: 1.20 $ $Date: 2005/01/28 02:10:57 $
 
 The "limited with" clause makes a "limited view"
 of a package visible in the compilation unit
@@ -5714,7 +5714,7 @@
 -----------------
 Thoughts on the implementation of "limited with" in AdaMagic
 
-          $Revision: 1.19 $ $Date: 2004/11/25 03:13:33 $
+          $Revision: 1.20 $ $Date: 2005/01/28 02:10:57 $
 
 The "limited with" clause makes a "limited view"
 of a package visible in the compilation unit