diff options
Diffstat (limited to 'nim/nsystem.pas')
| -rwxr-xr-x[-rw-r--r--] | nim/nsystem.pas | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/nim/nsystem.pas b/nim/nsystem.pas index 51ca05605..49d17b172 100644..100755 --- a/nim/nsystem.pas +++ b/nim/nsystem.pas @@ -217,8 +217,15 @@ procedure nimWrite(var f: tBinaryFile; const str: string); overload; procedure add(var x: string; const y: string); // Pascal version of string appending. Terminating zero is ignored. +function isNil(s: string): bool; + implementation +function isNil(s: string): bool; +begin + result := s = ''; +end; + {@ignore} procedure add(var x: string; const y: string); // Pascal version of string appending. Terminating zero is ignored. |