sinopt: optimise small shifts
commite8eae78d4bbe7f6510bc4c2ea2652e35d2de871f
authorketmar <ketmar@ketmar.no-ip.org>
Wed, 1 Nov 2023 02:38:22 +0000 (1 02:38 +0000)
committerketmar <ketmar@ketmar.no-ip.org>
Wed, 1 Nov 2023 02:38:22 +0000 (1 02:38 +0000)
tree66c3ac4b46285ddaf5e08ac0d2d64ec259b0d3aa
parent1b92e4104c9258988bb5e483cca822d35f327387
sinopt: optimise small shifts

FossilOrigin-Name: b3da195cf75043138619a67e630d642d3d0840a666e929d3bab36cf695d0a5f5
src/liburforth/urforth.c
urflibs/sinopt/sinopt-simple.f
urflibs/tests/test-sinopt-shifts-00.f [new file with mode: 0644]
urflibs/tests/test-sinopt-shifts-01.f [new file with mode: 0644]
urflibs/tests/test-sinopt-shifts-02.f [new file with mode: 0644]
urflibs/tests/test-sinopt-shifts-03.f [new file with mode: 0644]
urflibs/tests/test-sinopt-shifts-04.f [new file with mode: 0644]
urflibs/tests/test-sinopt-to-00.f [new file with mode: 0644]