1 files changed, 1 insertions, 5 deletions
diff --git a/src/libraries.adb b/src/libraries.adb
index d4e809b63..c1d06c7eb 100644
--- a/src/libraries.adb
+++ b/src/libraries.adb
@@ -1642,8 +1642,7 @@ package body Libraries is
       return Libraries_Chain;
    end Get_Libraries_Chain;
 
-   function Decode_Work_Option
-     (Opt : String; Immediate : Boolean; Load_Lib : Boolean) return Boolean
+   function Decode_Work_Option (Opt : String) return Boolean
    is
       pragma Assert (Opt'First = 1);
       Name : String (1 .. Opt'Last - 8 + 1);
@@ -1655,9 +1654,6 @@ package body Libraries is
          return False;
       end if;
       Libraries.Work_Library_Name := Get_Identifier (Name);
-      if Immediate then
-         Libraries.Load_Work_Library (not Load_Lib);
-      end if;
       return True;
    end Decode_Work_Option;
 end Libraries;