diff options
Diffstat (limited to 'packages/amunits/src/utilunits')
-rw-r--r-- | packages/amunits/src/utilunits/amigautils.pas | 5 | ||||
-rw-r--r-- | packages/amunits/src/utilunits/consoleio.pas | 5 | ||||
-rw-r--r-- | packages/amunits/src/utilunits/doublebuffer.pas | 5 | ||||
-rw-r--r-- | packages/amunits/src/utilunits/easyasl.pas | 5 | ||||
-rw-r--r-- | packages/amunits/src/utilunits/hisoft.pas | 5 | ||||
-rw-r--r-- | packages/amunits/src/utilunits/linklist.pas | 4 | ||||
-rw-r--r-- | packages/amunits/src/utilunits/pastoc.pas | 9 | ||||
-rw-r--r-- | packages/amunits/src/utilunits/timerutils.pas | 5 | ||||
-rw-r--r-- | packages/amunits/src/utilunits/vartags.pas | 4 | ||||
-rw-r--r-- | packages/amunits/src/utilunits/wbargs.pas | 5 |
10 files changed, 2 insertions, 50 deletions
diff --git a/packages/amunits/src/utilunits/amigautils.pas b/packages/amunits/src/utilunits/amigautils.pas index d9f4df022d..c30be2f626 100644 --- a/packages/amunits/src/utilunits/amigautils.pas +++ b/packages/amunits/src/utilunits/amigautils.pas @@ -24,11 +24,6 @@ nils.sjoholm@mailbox.swipnet.se } -{$I useamigasmartlink.inc} -{$ifdef use_amiga_smartlink} - {$smartlink on} -{$endif use_amiga_smartlink} - unit amigautils; interface diff --git a/packages/amunits/src/utilunits/consoleio.pas b/packages/amunits/src/utilunits/consoleio.pas index ca9ed258bf..639ab4998d 100644 --- a/packages/amunits/src/utilunits/consoleio.pas +++ b/packages/amunits/src/utilunits/consoleio.pas @@ -34,11 +34,6 @@ unit consoleio; } -{$I useamigasmartlink.inc} -{$ifdef use_amiga_smartlink} - {$smartlink on} -{$endif use_amiga_smartlink} - interface uses exec, intuition, console, amigalib, conunit; diff --git a/packages/amunits/src/utilunits/doublebuffer.pas b/packages/amunits/src/utilunits/doublebuffer.pas index ca304cf522..566ef96374 100644 --- a/packages/amunits/src/utilunits/doublebuffer.pas +++ b/packages/amunits/src/utilunits/doublebuffer.pas @@ -14,11 +14,6 @@ **********************************************************************} -{$I useamigasmartlink.inc} -{$ifdef use_amiga_smartlink} - {$smartlink on} -{$endif use_amiga_smartlink} - unit doublebuffer; diff --git a/packages/amunits/src/utilunits/easyasl.pas b/packages/amunits/src/utilunits/easyasl.pas index 4f44547b29..466e76399d 100644 --- a/packages/amunits/src/utilunits/easyasl.pas +++ b/packages/amunits/src/utilunits/easyasl.pas @@ -33,11 +33,6 @@ nils.sjoholm@mailbox.swipnet.se } -{$I useamigasmartlink.inc} -{$ifdef use_amiga_smartlink} - {$smartlink on} -{$endif use_amiga_smartlink} - unit easyasl; diff --git a/packages/amunits/src/utilunits/hisoft.pas b/packages/amunits/src/utilunits/hisoft.pas index e30fd35a7d..2f344a9782 100644 --- a/packages/amunits/src/utilunits/hisoft.pas +++ b/packages/amunits/src/utilunits/hisoft.pas @@ -26,11 +26,6 @@ nils.sjoholm@mailbox.swipnet.se Nils Sjoholm } -{$I useamigasmartlink.inc} -{$ifdef use_amiga_smartlink} - {$smartlink on} -{$endif use_amiga_smartlink} - unit hisoft; interface diff --git a/packages/amunits/src/utilunits/linklist.pas b/packages/amunits/src/utilunits/linklist.pas index 4e7fbe8a83..263bbcee9e 100644 --- a/packages/amunits/src/utilunits/linklist.pas +++ b/packages/amunits/src/utilunits/linklist.pas @@ -14,10 +14,6 @@ **********************************************************************} -{$I useamigasmartlink.inc} -{$ifdef use_amiga_smartlink} - {$smartlink on} -{$endif use_amiga_smartlink} unit linklist; diff --git a/packages/amunits/src/utilunits/pastoc.pas b/packages/amunits/src/utilunits/pastoc.pas index 1264515c43..e6fd71535a 100644 --- a/packages/amunits/src/utilunits/pastoc.pas +++ b/packages/amunits/src/utilunits/pastoc.pas @@ -22,11 +22,6 @@ nils.sjoholm@mailbox.swipnet.se Nils Sjoholm } -{$I useamigasmartlink.inc} -{$ifdef use_amiga_smartlink} - {$smartlink on} -{$endif use_amiga_smartlink} - { This unit must be deprecated because at least: - It is leaking memory. It allocates a new buffer for each string which won't @@ -34,9 +29,9 @@ - The unit doesn't provide any way to free allocated string buffers manually. (Because ReleasePas2C is not a public function.) - It does allocations outside the Pascal heap, which the compiler has no control - over, and makes it very hard to track these allocations, because the heaptrc + over, and makes it very hard to track these allocations, because the heaptrc unit doesn't work. - - The intuition.library documentation states that AllocRemember() is a quite + - The intuition.library documentation states that AllocRemember() is a quite ineffective function, because it does two memory allocations and because it doesn't use memory pools it has a terrible effect on memory fragmentation. - It uses a for loop byte to copy the string contents, which is very slow. diff --git a/packages/amunits/src/utilunits/timerutils.pas b/packages/amunits/src/utilunits/timerutils.pas index 8b34d872ee..971ef13262 100644 --- a/packages/amunits/src/utilunits/timerutils.pas +++ b/packages/amunits/src/utilunits/timerutils.pas @@ -14,11 +14,6 @@ **********************************************************************} -{$I useamigasmartlink.inc} -{$ifdef use_amiga_smartlink} - {$smartlink on} -{$endif use_amiga_smartlink} - unit timerutils; { diff --git a/packages/amunits/src/utilunits/vartags.pas b/packages/amunits/src/utilunits/vartags.pas index 22e9a97f44..e5701c9208 100644 --- a/packages/amunits/src/utilunits/vartags.pas +++ b/packages/amunits/src/utilunits/vartags.pas @@ -13,10 +13,6 @@ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. **********************************************************************} -{$I useamigasmartlink.inc} -{$ifdef use_amiga_smartlink} - {$smartlink on} -{$endif use_amiga_smartlink} unit vartags; diff --git a/packages/amunits/src/utilunits/wbargs.pas b/packages/amunits/src/utilunits/wbargs.pas index fe47f622e8..e2ff3ad78f 100644 --- a/packages/amunits/src/utilunits/wbargs.pas +++ b/packages/amunits/src/utilunits/wbargs.pas @@ -29,11 +29,6 @@ nils.sjoholm@mailbox.swipnet.se Nils Sjoholm } -{$I useamigasmartlink.inc} -{$ifdef use_amiga_smartlink} - {$smartlink on} -{$endif use_amiga_smartlink} - unit WBArgs; interface |