ProtectedメソッドでSuperが使用できない

[イグトランス (egtra)]

次のコードのSuper.doHoge()の行で「Protectedメンバ関数 "doHoge" を呼び出すことはできません」というエラーになってしまいます。

#console

Class Base
Public
	Sub Hoge()
		doHoge()
	End Sub
Protected
	Virtual Sub doHoge()
		Print "Base.Proc"
	End Sub
End Class

Class Derived
	Inherits Base
Protected
	Override Sub doHoge()
		Print "Derived.Proc"
		Super.doHoge()
	End Sub
End Class

Dim d = New Derived
d.Hoge()

Sleep(-1)

[dai]

[315]にて修正。