Skip to content
Snippets Groups Projects
Commit 052bb761 authored by Benoît Minisini's avatar Benoît Minisini :church:
Browse files

Fix DBusProxy._GetSignature() when generating Gambas syntax.

[GB.DBUS]
* BUG: Fix DBusProxy._GetSignature() when generating Gambas syntax.
parent 7df0a90d
No related branches found
No related tags found
No related merge requests found
Pipeline #706031193 failed
......@@ -143,10 +143,10 @@ Public Sub _GetSignature(sSymbol As String, Optional bFormat As Boolean) As Stri
Else If Mid$($sIntrospection, iStart) Begins "<method " Or If Mid$($sIntrospection, iStart) Begins "<signal " Then
If Mid$($sIntrospection, iEnd - 1, 2) <> "/>" Then
bSignal = Mid$($sIntrospection, iStart) Begins "<s"
If Mid$($sIntrospection, iEnd - 1, 2) <> "/>" Then
iEnd = InStr($sIntrospection, If(bSignal, "</signal>", "</method>"), iStart)
Do
......@@ -217,7 +217,7 @@ RETURN_SIGNATURE:
Case "m", "s"
If sType = "s" Then
If aSign[0] = "s" Then
sType = "Event"
Else If aSign[2] Then
sType = "Function"
......@@ -262,7 +262,9 @@ RETURN_SIGNATURE:
Endif
sComment = aSign[1] & " " & aSign[2]
sComment = Trim(aSign[1] & " " & aSign[2])
If sComment Then
Do
iPos = InStr(sComment, "'")
If iPos = 0 Then Break
......@@ -270,7 +272,9 @@ RETURN_SIGNATURE:
If iPos2 = 0 Then iPos2 = Len(sComment)
sComment = Left(sComment, iPos - 1) & Mid$(sComment, iPos2 + 1)
Loop
sType &= " ' " & sComment
Endif
End Select
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment