Skip to content

Commit

Permalink
This commit was manufactured by cvs2svn to create tag 'MCS_1_0_3'.
Browse files Browse the repository at this point in the history 
svn path=/tags/MCS_1_0_3/mcs/; revision=34814
  • Loading branch information
nobody committed Oct 8, 2004
16 parents 120479c + 4e4824a + 6f302f5 + 5a3ff91 + 361a871 + f7ffe59 + 0fae05d + 61362ce + a0ea59a + 5023609 + a865c14 + 098549d + 11d2121 + 4798cef + d1c5847 + 2d0b540 commit 081f745
Show file tree
Hide file tree
Showing 299 changed files with 6,538 additions and 1,491 deletions.
10 changes: 10 additions & 0 deletions mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic/ChangeLog
View file
@@ -1,3 +1,13 @@
2004-10-05 Anirban Bhattacharjee <banirban@novell.com>
* Interaction.cs:
* Strings.cs :
Few important fixes

2004-07-22 Jambunathan K <kjambunathan@novell.com>

* Constants.cs: Fixed definitions of vbCr, vbLf, vbCrLf and
vbNewLine

2004-06-24 Jambunathan K <kjambunathan@novell.com> 2004-06-24 Jambunathan K <kjambunathan@novell.com>
* RandomVBFile.cs: Fixed FileGet() for Date and Decimal types * RandomVBFile.cs: Fixed FileGet() for Date and Decimal types
* FileSystem.cs: Fixed ChDir, FileCopy * FileSystem.cs: Fixed ChDir, FileCopy
Expand Down
272 changes: 136 additions & 136 deletions mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic/Constants.cs
View file
@@ -1,11 +1,11 @@
// //
// Constants.cs // Constants.cs
// //
// Author: // Author:
// Chris J Breisch (cjbreisch@altavista.net) // Chris J Breisch (cjbreisch@altavista.net)
// //
// (C) 2002 Chris J Breisch // (C) 2002 Chris J Breisch
// //


// //
// Copyright (c) 2002-2003 Mainsoft Corporation. // Copyright (c) 2002-2003 Mainsoft Corporation.
Expand All @@ -30,131 +30,131 @@
// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
// //


using System; using System;


namespace Microsoft.VisualBasic { namespace Microsoft.VisualBasic {
[Microsoft.VisualBasic.CompilerServices.StandardModuleAttribute] [Microsoft.VisualBasic.CompilerServices.StandardModuleAttribute]
sealed public class Constants { sealed public class Constants {
// Declarations // Declarations
public const System.Int32 vbObjectError = (System.Int32)(-2147221504); public const System.Int32 vbObjectError = (System.Int32)(-2147221504);
public const System.String vbCrLf = "\n\r"; public const System.String vbCrLf = "\r\n";
public const System.String vbNewLine = "\n\r"; public const System.String vbNewLine = "\r\n";
public const System.String vbCr = "\n"; public const System.String vbCr = "\r";
public const System.String vbLf = "\r"; public const System.String vbLf = "\n";
public const System.String vbBack = "\b"; public const System.String vbBack = "\b";
public const System.String vbFormFeed = "\f"; public const System.String vbFormFeed = "\f";
public const System.String vbTab = "\t"; public const System.String vbTab = "\t";
public const System.String vbVerticalTab = "\v"; public const System.String vbVerticalTab = "\v";
public const System.String vbNullChar = "\0"; public const System.String vbNullChar = "\0";
public const System.String vbNullString = ""; public const System.String vbNullString = "";


public const AppWinStyle vbHide = AppWinStyle.Hide; public const AppWinStyle vbHide = AppWinStyle.Hide;
public const AppWinStyle vbNormalFocus = AppWinStyle.NormalFocus; public const AppWinStyle vbNormalFocus = AppWinStyle.NormalFocus;
public const AppWinStyle vbMinimizedFocus = AppWinStyle.MinimizedFocus; public const AppWinStyle vbMinimizedFocus = AppWinStyle.MinimizedFocus;
public const AppWinStyle vbMaximizedFocus = AppWinStyle.MaximizedFocus; public const AppWinStyle vbMaximizedFocus = AppWinStyle.MaximizedFocus;
public const AppWinStyle vbNormalNoFocus = AppWinStyle.NormalNoFocus; public const AppWinStyle vbNormalNoFocus = AppWinStyle.NormalNoFocus;
public const AppWinStyle vbMinimizedNoFocus = AppWinStyle.MinimizedNoFocus; public const AppWinStyle vbMinimizedNoFocus = AppWinStyle.MinimizedNoFocus;


public const CallType vbMethod = CallType.Method; public const CallType vbMethod = CallType.Method;
public const CallType vbGet = CallType.Get; public const CallType vbGet = CallType.Get;
public const CallType vbLet = CallType.Let; public const CallType vbLet = CallType.Let;
public const CallType vbSet = CallType.Set; public const CallType vbSet = CallType.Set;


public const CompareMethod vbBinaryCompare = CompareMethod.Binary; public const CompareMethod vbBinaryCompare = CompareMethod.Binary;
public const CompareMethod vbTextCompare = CompareMethod.Text; public const CompareMethod vbTextCompare = CompareMethod.Text;


public const DateFormat vbGeneralDate = DateFormat.GeneralDate; public const DateFormat vbGeneralDate = DateFormat.GeneralDate;
public const DateFormat vbLongDate = DateFormat.LongDate; public const DateFormat vbLongDate = DateFormat.LongDate;
public const DateFormat vbShortDate = DateFormat.ShortDate; public const DateFormat vbShortDate = DateFormat.ShortDate;
public const DateFormat vbLongTime = DateFormat.LongTime; public const DateFormat vbLongTime = DateFormat.LongTime;
public const DateFormat vbShortTime = DateFormat.ShortTime; public const DateFormat vbShortTime = DateFormat.ShortTime;


public const FirstDayOfWeek vbUseSystemDayOfWeek = FirstDayOfWeek.System; public const FirstDayOfWeek vbUseSystemDayOfWeek = FirstDayOfWeek.System;
public const FirstDayOfWeek vbSunday = FirstDayOfWeek.Sunday; public const FirstDayOfWeek vbSunday = FirstDayOfWeek.Sunday;
public const FirstDayOfWeek vbMonday = FirstDayOfWeek.Monday; public const FirstDayOfWeek vbMonday = FirstDayOfWeek.Monday;
public const FirstDayOfWeek vbTuesday = FirstDayOfWeek.Tuesday; public const FirstDayOfWeek vbTuesday = FirstDayOfWeek.Tuesday;
public const FirstDayOfWeek vbWednesday = FirstDayOfWeek.Wednesday; public const FirstDayOfWeek vbWednesday = FirstDayOfWeek.Wednesday;
public const FirstDayOfWeek vbThursday = FirstDayOfWeek.Thursday; public const FirstDayOfWeek vbThursday = FirstDayOfWeek.Thursday;
public const FirstDayOfWeek vbFriday = FirstDayOfWeek.Friday; public const FirstDayOfWeek vbFriday = FirstDayOfWeek.Friday;
public const FirstDayOfWeek vbSaturday = FirstDayOfWeek.Saturday; public const FirstDayOfWeek vbSaturday = FirstDayOfWeek.Saturday;


public const FileAttribute vbNormal = FileAttribute.Normal; public const FileAttribute vbNormal = FileAttribute.Normal;
public const FileAttribute vbReadOnly = FileAttribute.ReadOnly; public const FileAttribute vbReadOnly = FileAttribute.ReadOnly;
public const FileAttribute vbHidden = FileAttribute.Hidden; public const FileAttribute vbHidden = FileAttribute.Hidden;
public const FileAttribute vbSystem = FileAttribute.System; public const FileAttribute vbSystem = FileAttribute.System;
public const FileAttribute vbVolume = FileAttribute.Volume; public const FileAttribute vbVolume = FileAttribute.Volume;
public const FileAttribute vbDirectory = FileAttribute.Directory; public const FileAttribute vbDirectory = FileAttribute.Directory;
public const FileAttribute vbArchive = FileAttribute.Archive; public const FileAttribute vbArchive = FileAttribute.Archive;


public const FirstWeekOfYear vbUseSystem = FirstWeekOfYear.System; public const FirstWeekOfYear vbUseSystem = FirstWeekOfYear.System;
public const FirstWeekOfYear vbFirstJan1 = FirstWeekOfYear.Jan1; public const FirstWeekOfYear vbFirstJan1 = FirstWeekOfYear.Jan1;
public const FirstWeekOfYear vbFirstFourDays = FirstWeekOfYear.FirstFourDays; public const FirstWeekOfYear vbFirstFourDays = FirstWeekOfYear.FirstFourDays;
public const FirstWeekOfYear vbFirstFullWeek = FirstWeekOfYear.FirstFullWeek; public const FirstWeekOfYear vbFirstFullWeek = FirstWeekOfYear.FirstFullWeek;


public const VbStrConv vbUpperCase = VbStrConv.UpperCase; public const VbStrConv vbUpperCase = VbStrConv.UpperCase;
public const VbStrConv vbLowerCase = VbStrConv.LowerCase; public const VbStrConv vbLowerCase = VbStrConv.LowerCase;
public const VbStrConv vbProperCase = VbStrConv.ProperCase; public const VbStrConv vbProperCase = VbStrConv.ProperCase;
public const VbStrConv vbWide = VbStrConv.Wide; public const VbStrConv vbWide = VbStrConv.Wide;
public const VbStrConv vbNarrow = VbStrConv.Narrow; public const VbStrConv vbNarrow = VbStrConv.Narrow;
public const VbStrConv vbKatakana = VbStrConv.Katakana; public const VbStrConv vbKatakana = VbStrConv.Katakana;
public const VbStrConv vbHiragana = VbStrConv.Hiragana; public const VbStrConv vbHiragana = VbStrConv.Hiragana;
public const VbStrConv vbSimplifiedChinese = VbStrConv.SimplifiedChinese; public const VbStrConv vbSimplifiedChinese = VbStrConv.SimplifiedChinese;
public const VbStrConv vbTraditionalChinese = VbStrConv.TraditionalChinese; public const VbStrConv vbTraditionalChinese = VbStrConv.TraditionalChinese;
public const VbStrConv vbLinguisticCasing = VbStrConv.LinguisticCasing; public const VbStrConv vbLinguisticCasing = VbStrConv.LinguisticCasing;


public const TriState vbUseDefault = TriState.UseDefault; public const TriState vbUseDefault = TriState.UseDefault;
public const TriState vbTrue = TriState.True; public const TriState vbTrue = TriState.True;
public const TriState vbFalse = TriState.False; public const TriState vbFalse = TriState.False;


public const VariantType vbEmpty = VariantType.Empty; public const VariantType vbEmpty = VariantType.Empty;
public const VariantType vbNull = VariantType.Null; public const VariantType vbNull = VariantType.Null;
public const VariantType vbInteger = VariantType.Integer; public const VariantType vbInteger = VariantType.Integer;
public const VariantType vbLong = VariantType.Long; public const VariantType vbLong = VariantType.Long;
public const VariantType vbSingle = VariantType.Single; public const VariantType vbSingle = VariantType.Single;
public const VariantType vbDouble = VariantType.Double; public const VariantType vbDouble = VariantType.Double;
public const VariantType vbCurrency = VariantType.Currency; public const VariantType vbCurrency = VariantType.Currency;
public const VariantType vbDate = VariantType.Date; public const VariantType vbDate = VariantType.Date;
public const VariantType vbString = VariantType.String; public const VariantType vbString = VariantType.String;
public const VariantType vbObject = VariantType.Object; public const VariantType vbObject = VariantType.Object;
public const VariantType vbBoolean = VariantType.Boolean; public const VariantType vbBoolean = VariantType.Boolean;
public const VariantType vbVariant = VariantType.Variant; public const VariantType vbVariant = VariantType.Variant;
public const VariantType vbDecimal = VariantType.Decimal; public const VariantType vbDecimal = VariantType.Decimal;
public const VariantType vbByte = VariantType.Byte; public const VariantType vbByte = VariantType.Byte;
public const VariantType vbUserDefinedType = VariantType.UserDefinedType; public const VariantType vbUserDefinedType = VariantType.UserDefinedType;
public const VariantType vbArray = VariantType.Array; public const VariantType vbArray = VariantType.Array;


public const MsgBoxResult vbOK = MsgBoxResult.OK; public const MsgBoxResult vbOK = MsgBoxResult.OK;
public const MsgBoxResult vbCancel = MsgBoxResult.Cancel; public const MsgBoxResult vbCancel = MsgBoxResult.Cancel;
public const MsgBoxResult vbAbort = MsgBoxResult.Abort; public const MsgBoxResult vbAbort = MsgBoxResult.Abort;
public const MsgBoxResult vbRetry = MsgBoxResult.Retry; public const MsgBoxResult vbRetry = MsgBoxResult.Retry;
public const MsgBoxResult vbIgnore = MsgBoxResult.Ignore; public const MsgBoxResult vbIgnore = MsgBoxResult.Ignore;
public const MsgBoxResult vbYes = MsgBoxResult.Yes; public const MsgBoxResult vbYes = MsgBoxResult.Yes;
public const MsgBoxResult vbNo = MsgBoxResult.No; public const MsgBoxResult vbNo = MsgBoxResult.No;


public const MsgBoxStyle vbOKOnly = MsgBoxStyle.OKOnly; public const MsgBoxStyle vbOKOnly = MsgBoxStyle.OKOnly;
public const MsgBoxStyle vbOKCancel = MsgBoxStyle.OKCancel; public const MsgBoxStyle vbOKCancel = MsgBoxStyle.OKCancel;
public const MsgBoxStyle vbAbortRetryIgnore = MsgBoxStyle.AbortRetryIgnore; public const MsgBoxStyle vbAbortRetryIgnore = MsgBoxStyle.AbortRetryIgnore;
public const MsgBoxStyle vbYesNoCancel = MsgBoxStyle.YesNoCancel; public const MsgBoxStyle vbYesNoCancel = MsgBoxStyle.YesNoCancel;
public const MsgBoxStyle vbYesNo = MsgBoxStyle.YesNo; public const MsgBoxStyle vbYesNo = MsgBoxStyle.YesNo;
public const MsgBoxStyle vbRetryCancel = MsgBoxStyle.RetryCancel; public const MsgBoxStyle vbRetryCancel = MsgBoxStyle.RetryCancel;
public const MsgBoxStyle vbCritical = MsgBoxStyle.Critical; public const MsgBoxStyle vbCritical = MsgBoxStyle.Critical;
public const MsgBoxStyle vbQuestion = MsgBoxStyle.Question; public const MsgBoxStyle vbQuestion = MsgBoxStyle.Question;
public const MsgBoxStyle vbExclamation = MsgBoxStyle.Exclamation; public const MsgBoxStyle vbExclamation = MsgBoxStyle.Exclamation;
public const MsgBoxStyle vbInformation = MsgBoxStyle.Information; public const MsgBoxStyle vbInformation = MsgBoxStyle.Information;
public const MsgBoxStyle vbDefaultButton1 = MsgBoxStyle.DefaultButton1; public const MsgBoxStyle vbDefaultButton1 = MsgBoxStyle.DefaultButton1;
public const MsgBoxStyle vbDefaultButton2 = MsgBoxStyle.DefaultButton2; public const MsgBoxStyle vbDefaultButton2 = MsgBoxStyle.DefaultButton2;
public const MsgBoxStyle vbDefaultButton3 = MsgBoxStyle.DefaultButton3; public const MsgBoxStyle vbDefaultButton3 = MsgBoxStyle.DefaultButton3;
public const MsgBoxStyle vbApplicationModal = MsgBoxStyle.ApplicationModal; public const MsgBoxStyle vbApplicationModal = MsgBoxStyle.ApplicationModal;
public const MsgBoxStyle vbSystemModal = MsgBoxStyle.SystemModal; public const MsgBoxStyle vbSystemModal = MsgBoxStyle.SystemModal;
public const MsgBoxStyle vbMsgBoxHelp = MsgBoxStyle.MsgBoxHelp; public const MsgBoxStyle vbMsgBoxHelp = MsgBoxStyle.MsgBoxHelp;
public const MsgBoxStyle vbMsgBoxRight = MsgBoxStyle.MsgBoxRight; public const MsgBoxStyle vbMsgBoxRight = MsgBoxStyle.MsgBoxRight;
public const MsgBoxStyle vbMsgBoxRtlReading = MsgBoxStyle.MsgBoxRtlReading; public const MsgBoxStyle vbMsgBoxRtlReading = MsgBoxStyle.MsgBoxRtlReading;
public const MsgBoxStyle vbMsgBoxSetForeground = MsgBoxStyle.MsgBoxSetForeground; public const MsgBoxStyle vbMsgBoxSetForeground = MsgBoxStyle.MsgBoxSetForeground;


// Constructors // Constructors
// Properties // Properties
// Methods // Methods
// Events // Events
}; };
} }
2 changes: 1 addition & 1 deletion mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic/Interaction.cs
View file
Expand Up @@ -352,7 +352,7 @@ public static System.String Command ()
string [] args = Environment.GetCommandLineArgs (); string [] args = Environment.GetCommandLineArgs ();


if (args != null && args.Length > 1) { if (args != null && args.Length > 1) {
return string.Join (" ", args, 2, args.Length - 1); return string.Join (" ", args, 1, args.Length - 1);
} else { } else {
return ""; return "";
} }
Expand Down

0 comments on commit 081f745

Please sign in to comment.