История изменений
Исправление MOPKOBKA, (текущая версия) :
Ну и как итог ассемблерный выхлоп
SBCL: https://pastebin.com/raw/7vtuYNUJ (высшая оптимизация)
(def inc-or-dec (n b)
"Missing docstring"
(declare (optimize (speed 3)))
(py-if b
(1+ n)
(py-else
(1- n))))
Forth: https://pastebin.com/raw/tZD6WxMw (без оптимизаций)
: inc-or-dec ( n b -- n )
if
1+
else
1-
then ;
Исправление MOPKOBKA, :
Ну и как итог ассемблерный выхлоп
SBCL: https://pastebin.com/raw/7vtuYNUJ (высшая оптимизация)
(def inc-or-dec (n)
"Missing docstring"
(declare (optimize (speed 3)))
(py-if n
(1+ n)
(py-else
(1- n))))
Forth: https://pastebin.com/raw/tZD6WxMw (без оптимизаций)
: inc-or-dec ( n b -- n )
if
1+
else
1-
then ;
Исправление MOPKOBKA, :
Ну и как итог ассемблерный выхлоп
SBCL: https://pastebin.com/raw/7vtuYNUJ (вышсая оптимизация)
(def inc-or-dec (n)
"Missing docstring"
(declare (optimize (speed 3)))
(py-if n
(1+ n)
(py-else
(1- n))))
Forth: https://pastebin.com/raw/tZD6WxMw (без оптимизаций)
: inc-or-dec ( n b -- n )
if
1+
else
1-
then ;
Исправление MOPKOBKA, :
Ну и как итог ассемблерный выхлоп
SBCL: https://pastebin.com/raw/7vtuYNUJ
(def inc-or-dec (n)
"Missing docstring"
(declare (optimize (speed 3)))
(py-if n
(1+ n)
(py-else
(1- n))))
Forth: https://pastebin.com/raw/tZD6WxMw
: inc-or-dec ( n b -- n )
if
1+
else
1-
then ;
Исправление MOPKOBKA, :
Ну и как итог ассемблерный выхлоп
SBCL: https://pastebin.com/raw/7vtuYNUJ
(def inc-or-dec (n)
"Missing docstring"
(declare (optimize (speed 3)))
(py-if n
(1+ n)
(py-else
(1- n))))
Forth: https://pastebin.com/raw/tZD6WxMw
: inc-or-dec ( n -- n )
if
1+
else
1-
then ;
Исходная версия MOPKOBKA, :
Ну и как итог ассемблерный выхлоп
SBCL: https://pastebin.com/raw/7vtuYNUJ
(def inc-or-dec (n)
"Missing docstring"
(declare (optimize (speed 3)))
(py-if n
(1+ n)
(py-else
(1- n))))
Forth: https://pastebin.com/raw/tZD6WxMw
: inc-or-dec
if
1+
else
1-
then ;