ab.com コミュニティ

[quote]あるメソッドで、同一クラスのある内部メソッドと同名の関数を呼び出そうとしても、
引数にかかわらず、内部メソッドを呼び出そうとしているとコンパイラが認識してしまい、
「パラメータ指定が間違っています」とエラーメッセージが表示されます。 [/quote]
こちらのバグについては、ライブラリ開発のフォーラムで、既に報告済みです。以下、その返信内容の引用です。
[quote="山本（管理人）"]グローバル関数とクラスメソッドのオーバーロードですが、こちらも次回のバージョンアップで対応致します。ただし、構造の都合上、DLL関数をオーバーロードすることはできない制約を付ける形にさせてもらいます（すみません）。こちらも、後々は対応したいと思いますが、ちょっと今やるにはコード改変が多すぎるので、保留にさせてください（テキトーにチケットなげておいもらって良いです）。[/quote]

[quote]String型の変数にmalloc, calloc関数の戻り値を代入できてしまいます。 [/quote]
Stringクラスですよね？こちらに関しては、それ以外にも、Long型を何の警告も出すことなく、Stringクラスに代入できたりしてしまいます。バグを引き起こす原因の一つになりやすいので、どうにか対処しようと、以下の仕様提案をしているところです。

[url]http://www.activebasic.com/forum/viewtopic.php?t=1746[/url]
他にも方法があるかもしれませんが、私が思いついた方法はこんなものです。

#prompt
Class CTest1
Protected
  m_Name As String
  Virtual Sub DoPrintMsg()
  End Sub

Public
  Sub CTest(AName As String)
    m_Name = AName
  End Sub

  Sub PrintMsg()
    DoPrintMsg()
  End Sub
End Class

Class CInheritsTest
  inherits CTest1
Protected
  Override Sub DoPrintMsg()
    Print m_Name
  End Sub
Public
  Sub CInheritsTest(AName As String)
    CTest(AName)
  End Sub

  Sub PrintMsg2()
    Print m_Name
  End Sub
End Class

Dim A As CInheritsTest("hoge")
A.PrintMsg()   '何も起きない
A.PrintMsg2()

#prompt
Sub AProc(Num As Long)
  Print Str$(Num)
End Sub

Class CTest2
Private
  Sub AProc()
    Print "AProcメソッドの呼び出し"
  End Sub
Public
  Sub BProc()
    AProc(10)
  End Sub
End Class

Dim A As CTest2
A.BProc()

Virtual宣言のメソッドをオーバーライドしたメソッドを呼び出す時、
上位クラスのメソッドが呼び出される場合があります。
[code]#prompt
Class CTest1
Protected
m_Name As String
Virtual Sub DoPrintMsg()
End Sub

Public
Sub CTest(AName As String)
m_Name = AName
End Sub

Sub PrintMsg()
DoPrintMsg()
End Sub
End Class

Class CInheritsTest
inherits CTest1
Protected
Override Sub DoPrintMsg()
Print m_Name
End Sub
Public
Sub CInheritsTest(AName As String)
CTest(AName)
End Sub

Sub PrintMsg2()
Print m_Name
End Sub
End Class

Dim A As CInheritsTest("hoge")
A.PrintMsg() '何も起きない
A.PrintMsg2()
[/code]
あるメソッドで、同一クラスのある内部メソッドと同名の関数を呼び出そうとしても、
引数にかかわらず、内部メソッドを呼び出そうとしているとコンパイラが認識してしまい、
「パラメータ指定が間違っています」とエラーメッセージが表示されます。
[code]#prompt
Sub AProc(Num As Long)
Print Str$(Num)
End Sub

Class CTest2
Private
Sub AProc()
Print "AProcメソッドの呼び出し"
End Sub
Public
Sub BProc()
AProc(10)
End Sub
End Class

Dim A As CTest2
A.BProc()
[/code]
String型の変数にmalloc, calloc関数の戻り値を代入できてしまいます。
#strict宣言してもエラー表示がされないので、修正していただけるとありがたいです。

お手数だとは思いますが修正のほどよろしくお願いいたします。