SZ
log something if DEBUG; где use constant DEBUG => 0 точно соптимизируется комиплятором, а-ля
#ifdef в СиДавай проверим тупо..?
Size: a a a
2020 August 27
VG
Давай проверим тупо..?
я проверял в депарсе, оно исчезает
OP
Всё ещё не то!
Он постоянно будет проверять левел дебага. А нужно такую, которая не проверяет.
Он постоянно будет проверять левел дебага. А нужно такую, которая не проверяет.
Ты это не замеряешь. Это в сях делается. Это быстрее чем $a++
SZ
я проверял в депарсе, оно исчезает
Ух ты, прикольно
YK
Это оптимизируется при компиляции?
да
~/dev/tmp$ debug=0 perl -MO=Concise level.pl
3 <@> leave[1 ref] vKP/REFC ->(end)
1 <0> enter v ->2
2 <;> nextstate(main 187 level.pl:7) v:{ ->3
- <0> ex-const v/SHORT,FOLD ->3
level.pl syntax OK
~/dev/tmp$ debug=1 perl -MO=Concise level.pl
6 <@> leave[1 ref] vKP/REFC ->(end)
1 <0> enter v ->2
2 <;> nextstate(main 187 level.pl:7) v:{ ->3
- <1> null vK*/1,FOLD ->6
- <@> scope vK ->-
- <;> ex-nextstate(main 188 level.pl:7) v ->3
5 <@> die vK/1 ->6
3 <0> pushmark s ->4
4 <$> const(PV "Unimplemented") s ->5
level.pl syntax OK
VG
Ух ты, прикольно
и мой вопрос (сколько там месяцев назад) состоял лишь в том, что писать такую конструкцию каждый раз лениво
OP
С константами не юзабельно, в рантайме не включишь
VG
да, это еще одна причина
OP
А то что я прислал имеет скорость аналогичную выпиливанию, потому что из перла это замерять нереально
OP
Перл слишком медленный для этого
OP
Плюс там еще поддержка модулей есть чтобы отдельно включать логи с разных либ/частей аппликейшена
YK
с рантаймом да, но мне такое редко когда нужно было;
в остальном constant + %ENV позволяют включать лог в отдельных модулях, функциях и тп не меняя код и без лишних вызовов когда лог не нужен
в остальном constant + %ENV позволяют включать лог в отдельных модулях, функциях и тп не меняя код и без лишних вызовов когда лог не нужен
YK
Ктото хотел лог систему которая умеет делать типа
Log($message) if $DEBUG;
То есть не вычислять и не вызывать ничего если логи выключены.
Вот теперь можно
https://metacpan.org/pod/distribution/XLog/lib/XLog.pod
Log($message) if $DEBUG;
То есть не вычислять и не вызывать ничего если логи выключены.
Вот теперь можно
https://metacpan.org/pod/distribution/XLog/lib/XLog.pod
похоже зависимости не доехали
cpanm XS::libpanda XLog
XS::libpanda is up to date. (1.4.6)
--> Working on XLog
Fetching http://www.cpan.org/authors/id/S/SY/SYBER/XLog-1.0.0.tar.gz ... OK
==> Found dependencies: XS::libpanda
! Installing the dependencies failed: Installed version (1.4.6) of XS::libpanda is not in range 'v1.4.7'
OP
О блин да. Забыл залить. Залил. Минут чернз 10 появится
OP
Спасибо
OP
Интересно как цпантестеры прошли тесты
YK
видимо те что прошли не читают META.json
МИ
О блин да. Забыл залить. Залил. Минут чернз 10 появится
Всё хотел спросить — зачем вы привязываете модули к бренду panda? Завтра поменяете контору — и будете форкать?
OP
Мы не привязываем
OP
Раньше там в неймспейсе Panda:: было а щас нет