using System.Runtime.InteropServices;
using Microsoft.VisualBasic.CompilerServices;
+#if ONLY_1_1
+using DefaultParameterValueAttribute = Microsoft.VisualBasic.CompilerServices.__DefaultParameterValueAttribute;
+#endif
+
/**
* CURRENT LIMITATIONS
* @limit TAB(int) - not supported.
namespace Microsoft.VisualBasic
{
- [StandardModuleAttribute]
+ [StandardModule]
sealed public class FileSystem
{
private FileSystem () {}
int fileNumber,
String fileName,
OpenMode mode,
- [Optional, __DefaultArgumentValue((int)(-1))] OpenAccess access,
- [Optional, __DefaultArgumentValue((int)(-1))] OpenShare share,
- [Optional, __DefaultArgumentValue(-1)] int recordLength)
+ [Optional, __DefaultParameterValue((int)(-1))] OpenAccess access,
+ [Optional, __DefaultParameterValue((int)(-1))] OpenShare share,
+ [Optional, DefaultParameterValue(-1)] int recordLength)
{
if (!isFileNumberFree(fileNumber))
public static void FilePut(int fileNumber,
bool value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePut(int fileNumber,
byte value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePut(int fileNumber,
short value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePut(int fileNumber,
char value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePut(int fileNumber,
int value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePut(int fileNumber,
long value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePut(int fileNumber,
float value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePut(int fileNumber,
double value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePut(int fileNumber,
String value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber,
- [Optional, __DefaultArgumentValue(false)] bool stringIsFixedLength)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber,
+ [Optional, DefaultParameterValue(false)] bool stringIsFixedLength)
{
checkRecordNumber(recordNumber,true);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePut(int fileNumber,
DateTime value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FileGet(
int fileNumber,
ref byte value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
public static void FileGet(
int fileNumber,
ref bool value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
public static void FileGet(
int fileNumber,
ref short value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
public static void FileGet(
int fileNumber,
ref char value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
public static void FileGet(
int fileNumber,
ref int value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FileGet(
int fileNumber,
ref long value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FileGet(
int fileNumber,
ref float value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
VBFile vbFile = getVBFile(fileNumber);
public static void FileGet(
int fileNumber,
ref double value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
public static void FileGet(
int fileNumber,
ref Decimal value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,false);
public static void FileGet(
int fileNumber,
ref string value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber,
- [Optional, __DefaultArgumentValue(false)] bool stringIsFixedLength)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber,
+ [Optional, DefaultParameterValue(false)] bool stringIsFixedLength)
{
checkRecordNumber(recordNumber,true);
VBFile vbFile = getVBFile(fileNumber);
public static void FileGet(
int fileNumber,
ref DateTime value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,true);
public static void FileGet(
int fileNumber,
ref ValueType value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
throw new NotImplementedException();
}
public static void FileGet(
int fileNumber,
ref Array value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber,
- [Optional, __DefaultArgumentValue(false)] bool arrayIsDynamic,
- [Optional, __DefaultArgumentValue(false)] bool stringIsFixedLength)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber,
+ [Optional, DefaultParameterValue(false)] bool arrayIsDynamic,
+ [Optional, DefaultParameterValue(false)] bool stringIsFixedLength)
{
checkRecordNumber(recordNumber,true);
VBFile vbFile = getVBFile(fileNumber);
public static /*synchronized*/ String Dir(String pathName,
- [Optional, __DefaultArgumentValue((int)0)]
+ [Optional, __DefaultParameterValue((int)0)]
FileAttribute fileAttribute)
{
_fileIndex = 0;
public static void FileGetObject(
int fileNumber,
ref object value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,true);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePutObject(int fileNumber,
Object value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,true);
[System.ObsoleteAttribute(obsoleteMsg, false)]
public static void FilePut(Object FileNumber,
Object Value,
- [Optional, __DefaultArgumentValue(-1)] System.Object RecordNumber)
+ [Optional, DefaultParameterValue(-1)] System.Object RecordNumber)
{
throw new ArgumentException(Utils.GetResourceString("UseFilePutObject"));
}
[MonoTODO]
public static void FilePut(int FileNumber,
ValueType Value,
- [Optional, __DefaultArgumentValue((long)-1)] System.Int64 RecordNumber)
+ [Optional, DefaultParameterValue((long)-1)] System.Int64 RecordNumber)
{
throw new NotImplementedException();
public static void FilePut(int fileNumber,
Array value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber,
- [Optional, __DefaultArgumentValue(false)] bool arrayIsDynamic,
- [Optional, __DefaultArgumentValue(false)] bool stringIsFixedLength)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber,
+ [Optional, DefaultParameterValue(false)] bool arrayIsDynamic,
+ [Optional, DefaultParameterValue(false)] bool stringIsFixedLength)
{
checkRecordNumber(recordNumber,true);
VBFile vbFile = getVBFile(fileNumber);
public static void FilePut(int fileNumber,
Decimal value,
- [Optional, __DefaultArgumentValue((long)-1)] long recordNumber)
+ [Optional, DefaultParameterValue((long)-1)] long recordNumber)
{
checkRecordNumber(recordNumber,true);
VBFile vbFile = getVBFile(fileNumber);