Remove unused Is_Null function

stcarrez · Feb 6, 2020 · 8a8f547 · 8a8f547
1 parent 2eb0f02
commit 8a8f547
Showing 1 changed file with 1 addition and 6 deletions.
diff --git a/src/keystore-io-refs.adb b/src/keystore-io-refs.adb
@@ -1,6 +1,6 @@
 -----------------------------------------------------------------------
 --  keystore-io-refs -- IO stream reference holder
---  Copyright (C) 2019 Stephane Carrez
+--  Copyright (C) 2019, 2020 Stephane Carrez
 --  Written by Stephane Carrez (Stephane.Carrez@gmail.com)
 --
 --  Licensed under the Apache License, Version 2.0 (the "License");
@@ -21,11 +21,6 @@ package body Keystore.IO.Refs is
 
    use type Util.Concurrent.Counters.Counter_Access;
 
-   function Is_Null (Object : in Stream_Ref) return Boolean is
-   begin
-      return Object.Stream = null;
-   end Is_Null;
-
    function Create (Stream : in Wallet_Stream_Access) return Stream_Ref is
    begin
       return Result : Stream_Ref do