The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]



"Выпуск SBCL 2.3.9, реализации языка Common Lisp"
Версия для распечатки Пред. тема | След. тема
Форум Разговоры, обсуждение новостей
Исходное сообщение [ Отслеживать ]
Присылайте удачные настройки в раздел примеров файлов конфигурации на WIKI.opennet.ru.
. "Выпуск SBCL 2.3.9, реализации языка Common Lisp" +4 +/
Сообщение от Аноним (4), 30-Сен-23, 23:28 
> ((лисп) (это) ((эзотерический) ((на) (практике)) (никому) ((не) (нужный))) ((язык) (программирования)))))

https://github.com/gcc-mirror/gcc/blob/master/gcc/common.md


;; Common GCC machine description file, shared by all targets.
...
(define_constraint "V"
  "Matches a non-offsettable memory reference."
  (and (match_code "mem")
       (match_test "memory_address_addr_space_p (GET_MODE (op), XEXP (op, 0),
                         MEM_ADDR_SPACE (op))")
       (not (match_test "offsettable_nonstrict_memref_p (op)"))))

https://github.com/gcc-mirror/gcc/blob/master/gcc/match.pd

#if GIMPLE
/* Optimize (X + (X >> (prec - 1))) ^ (X >> (prec - 1)) into abs (X).  */
(simplify
(bit_xor:c (plus:c @0 (rshift@2 @0 INTEGER_CST@1)) @2)
(if (ANY_INTEGRAL_TYPE_P (TREE_TYPE (@0))
      && !TYPE_UNSIGNED (TREE_TYPE (@0))
      && wi::to_widest (@1) == element_precision (TREE_TYPE (@0)) - 1)
  (abs @0)))
#endif


Ответить | Правка | Наверх | Cообщить модератору

Оглавление
Выпуск SBCL 2.3.9, реализации языка Common Lisp, opennews, 30-Сен-23, 22:31  [смотреть все]
Форумы | Темы | Пред. тема | След. тема



Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2024 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру