From ab6a052504e341a1329718bc67150da308682595 Mon Sep 17 00:00:00 2001 From: Jambunathan K Date: Sun, 17 Oct 2004 13:38:52 +0000 Subject: [PATCH] Migrating mbas' test helper dlls from the old folder to here. svn path=/trunk/mcs/; revision=35055 --- mcs/mbas/Test/dlls/.cvsignore | 2 ++ mcs/mbas/Test/dlls/Delegate_dll.vb | 18 ++++++++++++ mcs/mbas/Test/dlls/Dll1.vb | 13 +++++++++ mcs/mbas/Test/dlls/Event_dll.vb | 17 +++++++++++ mcs/mbas/Test/dlls/OptionalArgu_dll.vb | 11 +++++++ mcs/mbas/Test/dlls/Override_dll.vb | 35 +++++++++++++++++++++++ mcs/mbas/Test/errors/.cvsignore | 2 ++ mcs/mbas/Test/errors/Makefile | 21 ++++++++++++++ mcs/mbas/Test/rerrors/.cvsignore | 2 ++ mcs/mbas/Test/test-mbas.pl | 4 +++ mcs/mbas/Test/tests/.cvsignore | 2 ++ mcs/mbas/Test/tests/Delegate_dll.dll | Bin 0 -> 2048 bytes mcs/mbas/Test/tests/Dll1.dll | Bin 0 -> 2048 bytes mcs/mbas/Test/tests/Event_dll.dll | Bin 0 -> 2560 bytes mcs/mbas/Test/tests/Makefile | 21 ++++++++++++++ mcs/mbas/Test/tests/OptionalArgu_dll.dll | Bin 0 -> 2048 bytes mcs/mbas/Test/tests/Override_dll.dll | Bin 0 -> 2560 bytes 17 files changed, 148 insertions(+) create mode 100644 mcs/mbas/Test/dlls/.cvsignore create mode 100644 mcs/mbas/Test/dlls/Delegate_dll.vb create mode 100755 mcs/mbas/Test/dlls/Dll1.vb create mode 100644 mcs/mbas/Test/dlls/Event_dll.vb create mode 100644 mcs/mbas/Test/dlls/OptionalArgu_dll.vb create mode 100644 mcs/mbas/Test/dlls/Override_dll.vb create mode 100644 mcs/mbas/Test/errors/.cvsignore create mode 100644 mcs/mbas/Test/errors/Makefile create mode 100644 mcs/mbas/Test/rerrors/.cvsignore create mode 100644 mcs/mbas/Test/tests/.cvsignore create mode 100755 mcs/mbas/Test/tests/Delegate_dll.dll create mode 100755 mcs/mbas/Test/tests/Dll1.dll create mode 100755 mcs/mbas/Test/tests/Event_dll.dll create mode 100644 mcs/mbas/Test/tests/Makefile create mode 100755 mcs/mbas/Test/tests/OptionalArgu_dll.dll create mode 100755 mcs/mbas/Test/tests/Override_dll.dll diff --git a/mcs/mbas/Test/dlls/.cvsignore b/mcs/mbas/Test/dlls/.cvsignore new file mode 100644 index 00000000000..e4d03cac95a --- /dev/null +++ b/mcs/mbas/Test/dlls/.cvsignore @@ -0,0 +1,2 @@ +*.results +*.log diff --git a/mcs/mbas/Test/dlls/Delegate_dll.vb b/mcs/mbas/Test/dlls/Delegate_dll.vb new file mode 100644 index 00000000000..b42c3137f7a --- /dev/null +++ b/mcs/mbas/Test/dlls/Delegate_dll.vb @@ -0,0 +1,18 @@ +REM Target: library + +Imports System + +NameSpace NSDelegate + Public Class C + public Delegate Sub SD() + + Public Sub S + 'Console.WriteLine("S - got called") + End Sub + + Public Sub callSD(d as SD) + 'Console.WriteLine("SD - got called") + d.Invoke() + End Sub + End Class +End NameSpace diff --git a/mcs/mbas/Test/dlls/Dll1.vb b/mcs/mbas/Test/dlls/Dll1.vb new file mode 100755 index 00000000000..9ebbf8b05a8 --- /dev/null +++ b/mcs/mbas/Test/dlls/Dll1.vb @@ -0,0 +1,13 @@ +REM Target: library + +Imports System + +Public Class Dll1 + +Public Shared Sub OutInt(ByRef i As Integer) + i = 123 +End Sub + +End Class + + diff --git a/mcs/mbas/Test/dlls/Event_dll.vb b/mcs/mbas/Test/dlls/Event_dll.vb new file mode 100644 index 00000000000..65f1c186f95 --- /dev/null +++ b/mcs/mbas/Test/dlls/Event_dll.vb @@ -0,0 +1,17 @@ +REM Target: library + +Imports System + +NameSpace NSEvent + +Class C + + Delegate Sub EvtHan(i as integer, y as string) + Public Event E as EvtHan + + Public Sub S() + RaiseEvent E (10, "abc") + End Sub +End Class + +End NameSpace diff --git a/mcs/mbas/Test/dlls/OptionalArgu_dll.vb b/mcs/mbas/Test/dlls/OptionalArgu_dll.vb new file mode 100644 index 00000000000..7b109fa2ad1 --- /dev/null +++ b/mcs/mbas/Test/dlls/OptionalArgu_dll.vb @@ -0,0 +1,11 @@ +REM Target: library + +Public Class c + public Function s (i As Integer, _ + Optional j As Integer = 10, _ + Optional k As String = "aaa") _ + as string + + Return ("s : " + i.ToString() + " - " + j.ToString() + " - " + k) + End Function +End Class diff --git a/mcs/mbas/Test/dlls/Override_dll.vb b/mcs/mbas/Test/dlls/Override_dll.vb new file mode 100644 index 00000000000..3bcbe37288a --- /dev/null +++ b/mcs/mbas/Test/dlls/Override_dll.vb @@ -0,0 +1,35 @@ +REM Target: library + +Imports System + +NameSpace NSOverride + Public Class B1 + Public Overridable readonly Property SS(i as integer, y as string) as Integer + get + End Get + End Property + + Public Overridable writeonly Property SS1(i as integer, y as string) as Integer + set (Value As Integer) + End Set + End Property + + Public Overridable Property SS2(i as integer, y as string) as Integer + get + End Get + set (Value As Integer) + End Set + End Property + + Public Overridable Sub S2(i as integer, j as string) + End Sub + End Class + + + Public Class B2 + Inherits B1 + + Public Overridable Sub S1(i as integer) + End Sub + End Class +End NameSpace diff --git a/mcs/mbas/Test/errors/.cvsignore b/mcs/mbas/Test/errors/.cvsignore new file mode 100644 index 00000000000..e4d03cac95a --- /dev/null +++ b/mcs/mbas/Test/errors/.cvsignore @@ -0,0 +1,2 @@ +*.results +*.log diff --git a/mcs/mbas/Test/errors/Makefile b/mcs/mbas/Test/errors/Makefile new file mode 100644 index 00000000000..401fc1a06a1 --- /dev/null +++ b/mcs/mbas/Test/errors/Makefile @@ -0,0 +1,21 @@ +thisdir = errors +SUBDIRS = +TEST_RUNTIME = mono +COMPILER_FLAGS = /libpath:../class/lib/default/ /imports:System +INTERNAL_MBAS = $(TEST_RUNTIME) --debug ../mbas/mbas.exe --stacktrace $(COMPILER_FLAGS) +LIBRARY_OPT = /target:library +DISTFILES = README.tests $(wildcard *.vb) + +all: run-test-local + +run-test-local: + rm -f *.exe *.log *.results; \ + ../test-mbas.pl + +all-local install-local test-local: + @: + + + + + diff --git a/mcs/mbas/Test/rerrors/.cvsignore b/mcs/mbas/Test/rerrors/.cvsignore new file mode 100644 index 00000000000..e4d03cac95a --- /dev/null +++ b/mcs/mbas/Test/rerrors/.cvsignore @@ -0,0 +1,2 @@ +*.results +*.log diff --git a/mcs/mbas/Test/test-mbas.pl b/mcs/mbas/Test/test-mbas.pl index 77b496c9fe9..443fde282fd 100755 --- a/mcs/mbas/Test/test-mbas.pl +++ b/mcs/mbas/Test/test-mbas.pl @@ -263,6 +263,10 @@ while(defined ($vbFile = glob($FilePattern))) { $RetVal = ValidateResults(); LogResults($RetVal); } + + if($RetVal == 0) { + unlink($VBLogFile); + } } close TEST_RESULTS_FILE; diff --git a/mcs/mbas/Test/tests/.cvsignore b/mcs/mbas/Test/tests/.cvsignore new file mode 100644 index 00000000000..e4d03cac95a --- /dev/null +++ b/mcs/mbas/Test/tests/.cvsignore @@ -0,0 +1,2 @@ +*.results +*.log diff --git a/mcs/mbas/Test/tests/Delegate_dll.dll b/mcs/mbas/Test/tests/Delegate_dll.dll new file mode 100755 index 0000000000000000000000000000000000000000..58c0c3ae7b8dd648b0b1a7401d94a37372242014 GIT binary patch literal 2048 zcmeHHO-vI}5dOBM+pg zjLOA}7ZVTa&6Dv!0@0I~#tUb!96fl`gEyQvyTy_a5))!#;-qip`)20No7sKa>^#r} zZ|&~`JA{=aSs$;e6pozx5W!aKZfr-J+>OmHl`3Mzv5QWwER39G*{;Y-;jCJsWQp{& zF3NU6COSIWF8HNyW`Id8fX(5`X#KQ3L}I73u-8=GDF~>=lJs!kcZ!;UWsx-bl>}LL z0`z0W)~6f;q5_!q@sTD8v>zEb-q|UDmWGr9@#_sd;mUQF_>O9lV*C>PzKO92U@_rH z(>DAblH^u7^k^C-38WhNpWywAor3lsNJ@Bc-nWWP5mxgYEem6|lUbM9T**SYV%Uz9 ziGpb&d9Xvx&7;L=UIJRZ5b?h$eSv;Dx@{ml0Q3dz5Ix9&lzt3tdLF9uJ}V>i|l9Oaou%FRzy{-YjFm^jC+bC=-&7@fNcxDWlb@dU+-d?PL9YY8W@agm>HIxuxX?E$ zt}G*AxVD3|G-Wa8$^~@^uV(GSswuA>^78c@!<1f6g$^TUntB=qkjk!_Zpp}1+=IC7 zol}bH*}PW{|N8ezxP~c_RsEE!+3+ z-0B(G+YAX!>uwK;fYuvr7J=@L?yg?;b-euY=F0c?FH+CuK7Q?a^{B>sPeKXrza?<_ MB#Qm7@vl9BUrq?8Qvd(} literal 0 HcmV?d00001 diff --git a/mcs/mbas/Test/tests/Dll1.dll b/mcs/mbas/Test/tests/Dll1.dll new file mode 100755 index 0000000000000000000000000000000000000000..3cea1449dc52a490fe8a33825417f80d064fa21e GIT binary patch literal 2048 zcmeHH&ubG=5dL=CNE&U3SW3LKFGN9#ET%thLDrbkA2deT)nRzp_Z#JoI0;7mluLm5G z&d}w4`qm|PcKUM`AIFXghsxSfVSUFA#IEmc`;E3R8?NhxqG<`g;|kjq)w&_tUdz(P z$1_*r)OQzwHATh2TyQI?c8qM{ymBsTDlrODcuDAyuKo$(caYeko$QPex#s|S|jla9%h5?843Dzr)*Cg2`&YxRxX=9~IG69*flmf;Q14*{= z;ydD%@I<<}E^R#c3@%ax<&`^kuTY&SVkxPA7wmYJ&r9}GvPmo;OPn*8sWSUUyF~v2 z=ir#h&Ldj{}%Pe5Nn>5`fqOF EH)~UB761SM literal 0 HcmV?d00001 diff --git a/mcs/mbas/Test/tests/Event_dll.dll b/mcs/mbas/Test/tests/Event_dll.dll new file mode 100755 index 0000000000000000000000000000000000000000..b6644f514f3b5bc651278a5d0f7f4c7b4323e5a1 GIT binary patch literal 2560 zcmeHHPiP!v6#vcapYCp(WfPS~4DGk1VhOm~KeU%3(@mB((j=v84HhAto%u+|%+7?_ z$=-Zw5-tYbU-uu39 zX5ku80#M|$vjaS&6mkrIHoHT2{pini{8-&;KC~`vHQ&1t4AgoOuO@C^d2STNsp@H! zY(y%E)Z9{6^Q&L^3s<(z$MGZm!}5jcURj+y?M|o1N`riq9%_aC)4e$Z!t;# zhOU#-E>tkQ0q}2_kvTLzU{V1~xxTM(fJ6H_o^5O>pfVET6JH#`tyJGkiNBV{=`*wD zeG?f{!1Y$5!`RDvaA=m8(ZYl@w<-P=?Y!Pl&PZlkW#C#a1uasSdG@E3**NLk)C+D9 zp+E5AMC+CxhH&;WWNvBOX>uSQij@}<{9n=$`#6`b%`DotDT_yI3B`IW7j33zXU4*D zc3Ml>rTwu4&9K2IKANBMwY%@Ot$ZT6C&Lr16Rp#yPM*ZKJf#xWY5R_arau9uSo%-m z>28_?(dvLIiYzI4(^tD_Pza`|c)CqH8NZNq;s{8w@z$M9^@2A1&wR}*BjnB3zrRxj~! zaTtFo3I23)(nLHqs0`1bN>hAgXuL*zEJtfZ*)Ro@*EDm;G{501ykRCY$a;V`aX?Cl z&-xu_&6F0`mANwh1$BN=jOCuu??0s%utiG|5@}%@RYe?JAwf&!dwp z4mjYV$MekwSFkES-TLtTS5I$$UV%MPm0zJeaj2v$OSo-KO$x8ntExCLUa3#KGG%;n r)4tz$@MvxB8|UsH{;gl?%a607FZgrY0hN7!?6;rW3NH%(k9Xj2Z+E~e literal 0 HcmV?d00001 diff --git a/mcs/mbas/Test/tests/Makefile b/mcs/mbas/Test/tests/Makefile new file mode 100644 index 00000000000..01ec8563ec0 --- /dev/null +++ b/mcs/mbas/Test/tests/Makefile @@ -0,0 +1,21 @@ +thisdir = tests +SUBDIRS = +TEST_RUNTIME = mono +COMPILER_FLAGS = /libpath:../class/lib/default/ /imports:System +INTERNAL_MBAS = $(TEST_RUNTIME) --debug ../mbas/mbas.exe --stacktrace $(COMPILER_FLAGS) +LIBRARY_OPT = /target:library +DISTFILES = README.tests $(wildcard *.vb) + +all: run-test-local + +run-test-local: + rm -f *.exe *.log *.results; \ + ../test-mbas.pl + +all-local install-local test-local: + @: + + + + + diff --git a/mcs/mbas/Test/tests/OptionalArgu_dll.dll b/mcs/mbas/Test/tests/OptionalArgu_dll.dll new file mode 100755 index 0000000000000000000000000000000000000000..432bfce95538c0fcf026da04dacbc8d3f5cc24b9 GIT binary patch literal 2048 zcmeHH%}x_h6#iyPOIz$PfQu3%-UdtvO2glR_?MwT5CfK^;DVSyJDuR*bf%dO23;sC zqgx-qr!bMQF!2G{`2Z|gXmp`#Jm=07Yivl|7!&>4d(QdJxj*OJdos)GKnKEcasup= z%`l`qTkKI-yL6!8P3kbWuPhzrRv*|6QTM$qzg!b$*>$}@R4n1|xWabDT(Kl-Ue(HH zGU=gc>y>$6Nm226vN6*w?ywq98(ZJ<`nXlFjwB$HuJZ&+l5xW!puqVS2u0<*SYZ<8%er z&1p~PfMGI}Xd~u-5(DZm9i1NO8|%U}9ZaOhCsFTKIIZ+By+zvZB8RlP)pp*vjExjZ zcM3{W3HQgN@%(sxYI0%%?+hT0I{CiP7<@{PNN4a{50(PocDEX2;sg24vu~}0W3tEC zE;wF=be59gRvlbeTbv`^1Wm(2Mn#GpQFF16TZop(!FH2#tT|Fxi?U51jUH;D0VzjG zGM1#|iWE9~n^;`h9|Z@VXS0%hl`H`VL&SM^7rL%ewYnaIPnq$&9*Sz{#}s-gP4;QX z;3BS|V~-a7gzLn3rx$&pn@^RHt>oAh6f4`78KCsI5m+_k&A{`q=mwJ$SoOjSMWkju z*DMDp)&tvf%g&6ywX?yUcw^bC?l{)1Um~(kO*CLr#Sej00|M7*pi^L!HC?8Fl6?E* z{=NRGqnAXqI8;s3I?@zNl)=A*h-t~B7VA_r9Isz^b@1%H@%q!ZtIEyYUf$xbh6ukc MDmUPN{Bt+(9kzOgi~s-t literal 0 HcmV?d00001 diff --git a/mcs/mbas/Test/tests/Override_dll.dll b/mcs/mbas/Test/tests/Override_dll.dll new file mode 100755 index 0000000000000000000000000000000000000000..8f0093f4f9cda24dc1bf15e32edc4394bdc4c110 GIT binary patch literal 2560 zcmeHI&rcIk5dPlw2ir=U5;#<2@HLf$plN6!o{XuLA8LR#Ss{j)KxsEvY`eH!2zW4< z7=ww47ykldq6d#868``^ar5Ybv*Bbs7(L+3+btGCIC$`&O!v*q_szW7neE$ld>RM= z2-4cy12)OBK;vrjZaavlPKhu;*S<*dcqz$yzUKAK6!))WmNfA! z0i_cFT}mnILlpy(5-@!KNRtQJj|?17CM2M@q?8F?Z^0SYT5$;{xp9iAS^d5VDUrZz z#<8k)$?qXgH0QJyCP;LF%pb{KPeSHfb{3=urhUt3f_$FmXqmZYJHsp1c(GDPtx>Wa z%gU6iRpj?~@Z8+?#T2khj_?aH{+rUR_0p}Qec?W!vtOv5i0EM4%2A8^oVO>e_7u#U z1>twkXJR><$z}!zayd0b2#aK2Q^E8jpo@yUB%C%~r&6D9aLQZa`0Gwjns`TkKl_EM zJxBI4VLqPe(a9S_WSc_eFdBL#A|Am|b-)gvZ$1h!pQ92g#ysDLb9hM%D$9o~iVk9c z3rh1eg6=y^XEUUHM$ZZ9gxatxIqhjOsbb$08WASqgug4a6`4jCb)u&@b1PCpH&tr) z(F2OOi>*TcSs9(e({hW!2Lr^Yv%801l;!-`eCcX~8GD__)+uU6(@%q>_Y7v^fi zwQ9(eT-$-MY&lM)Y|Zcsae3S>FIBB82Uzv06tb8wo4GJ^s9*u}mOEpbSVcoQSxgnH zOO{XPd^QJ4G0iNk914W8&AtK>LVy48?$qhQoo6Ab2|Z3)*W-aUp@(IFupZKx2udOJ mABM5;Gx5gQ2<44WAHQ5`mN~Ki_!E%ce~ZRHMkn&$J%L}FG?s+` literal 0 HcmV?d00001 -- 2.25.1