|
Last change
on this file since 399 was 385, checked in by イグトランス (egtra), 18 years ago |
|
例外クラスの実装。ExceptionTestでSystem.Exceptionを使用するようにした。
StringBuilderでコメント化されていた例外を投げる処理を有効にした（除OutOfMemory）。
Str$の実装にSPrintfなどを使用するようにした。
毎回Object.ReferenceEquals(xxx, Nothing)と打つのが面倒なので、IsNothingを導入。
|
|
File size:
175 bytes
|
| Line | |
|---|
| 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.
