comparison src/evalfunc.c @ 16606:7e733046db1d v8.1.1306

patch 8.1.1306: Borland support is outdated and doesn't work commit https://github.com/vim/vim/commit/eae1b91fea74842000fc055afc74fe2e7934c6ee Author: Bram Moolenaar <Bram@vim.org> Date: Thu May 9 15:12:55 2019 +0200 patch 8.1.1306: Borland support is outdated and doesn't work Problem: Borland support is outdated and doesn't work. Solution: Remove Borland support, there are other (free) compilers available. (Thomas Dziedzic, Ken Takata, closes #4364)
author Bram Moolenaar <Bram@vim.org>
date Thu, 09 May 2019 15:15:07 +0200
parents 1e0a5f09fdf1
children 7ad3fc329e08
comparison
equal deleted inserted replaced
16605:50115650f6c7 16606:7e733046db1d
12498 else 12498 else
12499 rettv->vval.v_float = 0.0; 12499 rettv->vval.v_float = 0.0;
12500 } 12500 }
12501 #endif 12501 #endif
12502 12502
12503 static int 12503 static int item_compare(const void *s1, const void *s2);
12504 #ifdef __BORLANDC__ 12504 static int item_compare2(const void *s1, const void *s2);
12505 _RTLENTRYF
12506 #endif
12507 item_compare(const void *s1, const void *s2);
12508 static int
12509 #ifdef __BORLANDC__
12510 _RTLENTRYF
12511 #endif
12512 item_compare2(const void *s1, const void *s2);
12513 12505
12514 /* struct used in the array that's given to qsort() */ 12506 /* struct used in the array that's given to qsort() */
12515 typedef struct 12507 typedef struct
12516 { 12508 {
12517 listitem_T *item; 12509 listitem_T *item;
12538 12530
12539 /* 12531 /*
12540 * Compare functions for f_sort() and f_uniq() below. 12532 * Compare functions for f_sort() and f_uniq() below.
12541 */ 12533 */
12542 static int 12534 static int
12543 #ifdef __BORLANDC__
12544 _RTLENTRYF
12545 #endif
12546 item_compare(const void *s1, const void *s2) 12535 item_compare(const void *s1, const void *s2)
12547 { 12536 {
12548 sortItem_T *si1, *si2; 12537 sortItem_T *si1, *si2;
12549 typval_T *tv1, *tv2; 12538 typval_T *tv1, *tv2;
12550 char_u *p1, *p2; 12539 char_u *p1, *p2;
12625 vim_free(tofree2); 12614 vim_free(tofree2);
12626 return res; 12615 return res;
12627 } 12616 }
12628 12617
12629 static int 12618 static int
12630 #ifdef __BORLANDC__
12631 _RTLENTRYF
12632 #endif
12633 item_compare2(const void *s1, const void *s2) 12619 item_compare2(const void *s1, const void *s2)
12634 { 12620 {
12635 sortItem_T *si1, *si2; 12621 sortItem_T *si1, *si2;
12636 int res; 12622 int res;
12637 typval_T rettv; 12623 typval_T rettv;