rainlance/amiga-tz
1
0
Fork 0
mirror of https://frontier.innolan.net/rainlance/amiga-tz.git synced 2026-05-07 06:07:17 +00:00
Code Releases Activity

relaxed TURBOC bug fix

Browse Source 
SCCS-file: ialloc.c
SCCS-SID: 8.5
This commit is contained in:
Arthur David Olson
1988-02-10 19:43:01 -05:00
committed by Paul Eggert
parent f2dc9a94e4
commit cf3e1f81f6
1 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
ialloc.c
View File

@@ -36,13 +36,13 @@ imalloc(n)
#else /* !defined MAL */
if (n == 0)
n = 1;
#if defined __TURBOC__
#if defined __TURBOC__ && __TURBOC__ == 1
/*
** Beat a TURBOC bug.
** Beat a TURBOC 1.0 bug.
*/
if ((n & 1) != 0)
++n;
#endif /* defined __TURBOC__ */
#endif /* defined __TURBOC__ && __TURBOC__ == 1 */
return malloc((alloc_t) n);
#endif /* !defined MAL */
}
@@ -52,10 +52,10 @@ icalloc(nelem, elsize)
{
if (nelem == 0 || elsize == 0)
nelem = elsize = 1;
#if defined __TURBOC__
#if defined __TURBOC__ && __TURBOC__ == 1
if ((nelem & 1) != 0 && (elsize & 1) != 0)
++nelem;
#endif /* defined __TURBOC__ */
#endif /* defined __TURBOC__ && __TURBOC__ == 1 */
return calloc((alloc_t) nelem, (alloc_t) elsize);
}
@@ -67,10 +67,10 @@ char * pointer;
return imalloc(size);
if (size == 0)
size = 1;
#if defined __TURBOC__
#if defined __TURBOC__ && __TURBOC__ == 1
if ((size & 1) != 0)
++size;
#endif /* defined __TURBOC__ */
#endif /* defined __TURBOC__ && __TURBOC__ == 1 */
return realloc(pointer, (alloc_t) size);
}