[DEVELOPMENT ENVIRONMENT]
* BUG: No margin for the output console. * NEW: Better support of subroutines in automatic variable declaration. git-svn-id: svn://localhost/gambas/trunk@5046 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
parent
45af334364
commit
c8f0242632
3 changed files with 7 additions and 1 deletions
|
@ -71,6 +71,7 @@ Public Sub ReadConfig()
|
|||
edtOutput.Flags[Editor.ShowCurrentLine] = False
|
||||
edtOutput.Flags[Editor.ShowModifiedLines] = False
|
||||
edtOutput.Flags[Editor.ShowLineNumbers] = False
|
||||
edtOutput.Flags[Editor.HideMargin] = True
|
||||
|
||||
Project.SetSmallFont(tlbOutput)
|
||||
|
||||
|
|
|
@ -3476,6 +3476,9 @@ Private Sub GetExpressionTypeWithEval(aSym As String[], aType As Integer[]) As S
|
|||
Else If aType[I] = Highlight.Function Then
|
||||
|
||||
I2 = FindNextBracket(aSym, I, "(", ")")
|
||||
hSymbol = CComponent.GetClassSymbols(".")[aSym[I]]
|
||||
Try sType = hSymbol.Type
|
||||
If sType Then I = I2
|
||||
|
||||
Else If aSym[I] = "[" Then
|
||||
|
||||
|
@ -3596,6 +3599,8 @@ Private Sub CreateLocalVariable() As Boolean
|
|||
Dim sType As String
|
||||
Dim I As Integer
|
||||
|
||||
' TODO: Support for X = Read ...
|
||||
|
||||
' Assignment
|
||||
If aSym.Count >= 3 And If aType[0] = Highlight.Symbol And If aSym[1] = "=" Then
|
||||
|
||||
|
|
|
@ -307,7 +307,7 @@
|
|||
}
|
||||
{ edtEditor Editor Editors
|
||||
Name = "edtEditor"
|
||||
MoveScaled(37,14,36,22)
|
||||
MoveScaled(23,8,44,28)
|
||||
Expand = True
|
||||
Border = False
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue