فهرست منبع

Fixed regression, parsing some cases of ".."
New dotdot test.
Added brl.systemdefault to module tests.

woollybah 11 سال پیش
والد
کامیت
11f2ea3014
3فایلهای تغییر یافته به همراه41 افزوده شده و 1 حذف شده
  1. 1 1
      parser.bmx
  2. 39 0
      tests/framework/language/dotdot_01.bmx
  3. 1 0
      tests/mods.conf

+ 1 - 1
parser.bmx

@@ -2034,7 +2034,7 @@ Type TParser
 			End If
 			End If
 		End If
 		End If
 		
 		
-		If eatToke Then
+		If eatToke And Not count Then
 			NextToke
 			NextToke
 		End If
 		End If
 	End Method
 	End Method

+ 39 - 0
tests/framework/language/dotdot_01.bmx

@@ -0,0 +1,39 @@
+Strict
+
+Framework brl.standardio
+
+
+
+
+
+
+Function RenderText(text:String, xpos:Int, ypos:Int, centered:Int = False, ..
+					  shadow:Int = False, caps:Int = False)
+
+End Function
+
+
+Extern
+
+Function Decode_Ogg:Byte Ptr(..
+	datasource:Object,..
+	reado(buf@Ptr,size,nmemb,src:Object),..
+	seeko(src:Object,offset:Long,whence),..
+	closeo(src:Object),..
+	tello(src:Object ),..
+	samples Var,channels Var,freq Var)
+
+End Extern
+
+
+Function createIO:Int()
+	Return test(test2(10, ..
+			15, Null, Null))
+End Function
+
+Function test:Int(val:Int)
+End Function
+
+Function test2:Int(a:Int, b:Int, x:Object, y:Object)
+End Function
+

+ 1 - 0
tests/mods.conf

@@ -13,6 +13,7 @@ brl.bank
 brl.bankstream
 brl.bankstream
 brl.filesystem
 brl.filesystem
 brl.system
 brl.system
+brl.systemdefault
 brl.eventqueue
 brl.eventqueue
 pub.win32
 pub.win32
 brl.math
 brl.math