File 4141-megaco-Types-and-spec-for-megaco-print_ver... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 4141-megaco-Types-and-spec-for-megaco-print_version_info-.patch of Package erlang

From 19290bd9b40cd6268211571d64de91151329a8ec Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Tue, 2 Jan 2024 18:02:10 +0100
Subject: [PATCH 21/46] [megaco] Types and spec for
 megaco:print_version_info/0,1

OTP-18920
---
 lib/megaco/doc/src/megaco.xml | 8 ++------
 lib/megaco/src/app/megaco.erl | 6 ++++++
 2 files changed, 8 insertions(+), 6 deletions(-)

diff --git a/lib/megaco/doc/src/megaco.xml b/lib/megaco/doc/src/megaco.xml
index f420947c92..e5930a5b35 100644
--- a/lib/megaco/doc/src/megaco.xml
+++ b/lib/megaco/doc/src/megaco.xml
@@ -2339,13 +2339,9 @@ megaco_incr_timer() = #megaco_incr_timer{}
     </func>
 
     <func>
-      <name since="">print_version_info() -> void()</name>
-      <name since="">print_version_info(VersionInfo) -> void()</name>
+      <name name="print_version_info" arity="0" clause_i="1" since=""/>
+      <name name="print_version_info" arity="1" clause_i="1" since=""/>
       <fsummary>Formated print of result of the versions functions</fsummary>
-      <type>
-        <v>VersionInfo = [version_info()]</v>
-        <v>version_info() = term()</v>
-      </type>
       <desc>
         <p>Utility function to produce a formated printout of the versions 
           info generated by the <c><![CDATA[versions1]]></c> and <c><![CDATA[versions2]]></c> 
diff --git a/lib/megaco/src/app/megaco.erl b/lib/megaco/src/app/megaco.erl
index ed02b8b621..4a4d7dc8d7 100644
--- a/lib/megaco/src/app/megaco.erl
+++ b/lib/megaco/src/app/megaco.erl
@@ -821,10 +821,16 @@ get_sdp_record_from_PropertyGroup(Type, PG) ->
 
 %%-----------------------------------------------------------------
 
+-spec print_version_info() -> void().
+
 print_version_info() ->
     {ok, Versions} = megaco:versions1(),
     print_version_info(Versions).
 
+-spec print_version_info(Versions) -> void() when
+      Versions    :: [VersionInfo],
+      VersionInfo :: term().
+
 print_version_info(Versions) when is_list(Versions) ->
     print_sys_info(Versions),
     print_os_info(Versions),
-- 
2.35.3

Places

File 4141-megaco-Types-and-spec-for-megaco-print_version_info-.patch of Package erlang

Places