Last change
on this file since 398 was 385, checked in by イグトランス (egtra), 17 years ago |
例外クラスの実装。ExceptionTestでSystem.Exceptionを使用するようにした。
StringBuilderでコメント化されていた例外を投げる処理を有効にした(除OutOfMemory)。
Str$の実装にSPrintfなどを使用するようにした。
毎回Object.ReferenceEquals(xxx, Nothing)と打つのが面倒なので、IsNothingを導入。
|
File size:
175 bytes
|
Rev | Line | |
---|
[385] | 1 | 'Classes/ActiveBasic/misc.ab
|
---|
| 2 |
|
---|
| 3 | Namespace ActiveBasic
|
---|
| 4 | Function IsNothing(o As Object) As Boolean
|
---|
| 5 | Return Object.ReferenceEquals(o, Nothing)
|
---|
| 6 | End Function
|
---|
| 7 | End Namespace
|
---|
Note:
See
TracBrowser
for help on using the repository browser.