#81 Баг в оптимизаторе

SPF 4.21
closed-fixed
ruvim
src (38)
8
2012-11-10
2012-11-01
Anonymous
No

Задача считать из памяти две ячейки сравнить и поменять местами если первая больше второй, и записать назад. В данном случае для наглядности опущен оператор 2! перед THEN

: PRINTSTACK DEPTH 0 DO . LOOP CR ;

CREATE ARR 2 CELLS ALLOT

222 ARR ! 111 ARR CELL + !

: CMPSWP DUP 2@ 2DUP < IF SWAP ROT THEN ;

ARR CMPSWP PRINTSTACK

DIS-OPT

: CMPSWP2 DUP 2@ 2DUP < IF SWAP ROT THEN ;

ARR CMPSWP2 PRINTSTACK

Discussion

  • ruvim

    ruvim - 2012-11-01
    • priority: 5 --> 8
    • assigned_to: nobody --> mihail4444
    • status: open --> open-accepted
     
  • ruvim

    ruvim - 2012-11-01

    Спасибо за багрепорт. К сожалению, ранее Михаил (автор оптимизатора) замечал только багрепорты на форуме Winglion (см. http://fforum.winglion.ru/viewtopic.php?p=34912#p34912\), поэтому если там продублируете — будет хорошо.

     
  • ruvim

    ruvim - 2012-11-10
    • assigned_to: mihail4444 --> ruv
    • labels: --> src
    • milestone: 1307401 --> SPF 4.21
    • status: open-accepted --> closed-fixed
     

Get latest updates about Open Source Projects, Conferences and News.

Sign up for the SourceForge newsletter:





No, thanks