projects
/
mono.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
new error test
[mono.git]
/
mcs
/
btests
/
IntegerLiteral2Test.vb
1
imports System
2
3
Module IntegerLiteral2Test
\r
4
Sub main()
\r
5
Try
6
Dim i As Integer
\r
7
i = &H2B
\r
8
If (i <> 43) Then
\r
9
Throw New Exception("#A1 : Unexpected behaviour")
\r
10
End If
\r
11
\r
12
i = &O35
\r
13
If (i <> 29) Then
\r
14
Throw New Exception("#A2 : Unexpected behaviour")
\r
15
End If
\r
16
17
Catch e As Exception
\r
18
Console.WriteLine(e.Message)
\r
19
End Try
\r
20
End Sub
\r
21
End Module