Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+83
var
ABuffer: PAnsiChar;
AText: PAnsiChar;
BBuffer: PAnsiChar;
begin
ABuffer := 'TEST';
BinToHex(ABuffer, AText, Length(ABuffer));
ShowMessage(AText);
ShowMessage(IntToStr(Length(AText)));
GetMem(BBuffer, Length(AText) div 2);
HexToBin(AText, BBuffer, Length(AText) div 2);
BBuffer[Length(BBuffer) - 1] := #0;
ShowMessage(IntToStr(SizeOf(BBuffer)));
ShowMessage(BBuffer);
FreeMem(BBuffer);
end;
http://www.sql.ru/forum/653685/bintohex-i-hextobin-delphi2009
Возможно, я ошибаюсь, но по-моему код - лажа; насколько я понимаю, указатель "AText: PAnsiChar;" всего лишь УКАЗАТЕЛЬ, под него нигде в коде не выделяется память, автор юзает его как простую переменную.
И никто его не поправил. Вроде думающие люди.
brutushafens,
25 Мая 2014
+17
io_service::strand strand_one(service), strand_two(service);
for (int i = 0; i < 5; ++i)
service.post(strand_one.wrap(boost::bind(func, i)));
for (int i = 5; i < 10; ++i)
service.post(strand_two.wrap(boost::bind(func, i)));
Пример из книги Boost.Asio C++ Network Programming.
In the preceding code, we made sure that the first five and the last five were serialized namely, "func called, i = 0" is called before "func called, i = 1", which is called before "func called, i = 2", and so on. The same goes for "func called, i = 5", which is called before "func called, i = 6", and "func called, i = 6" is called before "func called, i = 7", and so on.
"А вот хуй тебе!", - сказал четырёхъядерный процессор, и выполнил коллбеки внутри strand'ов в случайном порядке.
bormand,
25 Мая 2014
+11
QString Factory::lifeEqual(WidgetEnum::SearchWidgetSet param) {
switch (param) {
case WidgetEnum::station:
return "Станция";
case WidgetEnum::water_area:
return "Акватория";
case WidgetEnum::station_coordinates:
return "Координаты станции";
case WidgetEnum::volume_of_filtered_water:
return "Объем отфильтрованной воды";
case WidgetEnum::chlorophyll_a_concentration:
return "Концентрация хлорофила а";
case WidgetEnum::chlorophyll_b_concentration:
return "Концентрация хлорофила b";
case WidgetEnum::chlorophyll_c_concentration:
return "Концентрация хлорофила c";
case WidgetEnum::A665k:
return "A(665k";
case WidgetEnum::pigment_index:
return "Индекс пигмента";
case WidgetEnum::pheopigments:
return "Феопигменты";
case WidgetEnum::upholding_sample_time:
return "Время выдержки образца";
case WidgetEnum::concetrated_sample_volume:
return "Объемная концентрация образца";
case WidgetEnum::cameras_viewed_number:
return "Качество камеры";
case WidgetEnum::total:
return "Общая численость";
case WidgetEnum::total_species:
return "Число видов в пробе";
case WidgetEnum::total_biomass:
return "Общая биомасса";
case WidgetEnum::total_percent:
return "Итоговый процент";
case WidgetEnum::biomass_percent:
return "Процент биомасс";
case WidgetEnum::percentage_of_total:
return "Процент от общего числа";
case WidgetEnum::percentage_of_the_total_biomass:
return "Процент от общего числа биомассы";
case WidgetEnum::number:
return "Номер";
case WidgetEnum::biomass:
return "Биомасса";
case WidgetEnum::total_species_in_group:
return "Всего видов в группе";
case WidgetEnum::name:
return "Название";
case WidgetEnum::name_alt:
return "Альтернативное название";
case WidgetEnum::name_rus:
return "Русское название";
case WidgetEnum::fishing_gear:
return "Рыболовный аппарат";
case WidgetEnum::assessment_of_zooplankton:
return "Оценка зоопланктона";
case WidgetEnum::date:
return "Дата";
case WidgetEnum::Station_water_area:
return "";
case WidgetEnum::groupsOfPh_name:
return "Название группы";
case WidgetEnum::groups:
return "Вид";
case WidgetEnum::error:
return "errorA";
case WidgetEnum::chlorinity:
return "chlorinity";
case WidgetEnum::density:
return "density";
case WidgetEnum::volume:
return "volume";
case WidgetEnum::o2_mg_l:
return "o2_mg_l";
case WidgetEnum::o2_ml_l:
return "o2_ml_l";
case WidgetEnum::bod5:
return "bod5";
case WidgetEnum::ph:
return "ph";
case WidgetEnum::alk:
return "alk";
case WidgetEnum::no2:
return "no2";
case WidgetEnum::no3:
return "no3";
case WidgetEnum::total_n:
return "total_n";
case WidgetEnum::po4:
return "po4";
case WidgetEnum::total_p:
return "total_p";
case WidgetEnum::si:
return "si";
And etc.....
В таком духе имеется строк 300, и если бы выход здравого смысла из спячки и наличие базы данных, 50 строчек которыми все это стало, с течением времени могло бы превратиться в 1000 строк, если не больше.
И хоть это банальный гавногод, жалко трудов и времени на него затраченных. А так хоть канет в бездне говногода, а не в бездне моего винта.
smith599,
25 Мая 2014
−114
select
row_number() over (order by count(*) desc) r,
case when t719.f7171 is null and t719.f7201 is null then 'За поданням
голови ОВК, капітана судна, керівн. полярної станції України'
when t719.f7171 is not null then t717.name1
when t719.f7201 is not null then t720.f7202||'
'||t720.f7203||' '||t720.f7204
end t021f02,
count(*) count1
from t719,
t066,
t714,
v1_t717 t717,
t720
where t719.t001f01=PT001F01 and
t719.t001f01=t066.t001f01 and
t719.f7331=t066.f7331 and
t719.f7141=t066.f7141 and
t719.f7191=t066.f7191 and
t066.T066F02 is not null and
t066.T066F03 is null and
t719.t001f01=t714.t001f01 and
t719.f7331=t714.f7331 and
t719.f7141=t714.f7141 and
t714.f71480 is null and
t719.f7171=t717.f7171(+) and
t719.t001f01=t717.t001f01(+) and
t719.f7201=t720.f7201(+) and
t719.t001f01=t720.t001f01(+)
group by case when t719.f7171 is null and t719.f7201 is null then 'За
поданням голови ОВК, капітана судна, керівн. полярної станції України'
when t719.f7171 is not null then t717.name1
when t719.f7201 is not null then t720.f7202||'
'||t720.f7203||' '||t720.f7204
end
order by count(*) desc, 1;
Оттуда же.
Ну и как такое можно сапортить?
DBdev,
24 Мая 2014
+129
mixin(iota(3).map!(i => format("v[%1$d]+=rhs.v[%1$d];", i)).join());
LispGovno,
23 Мая 2014
−123
ИначеЕсли Отправитель = "h*@**k.ua" Тогда
НовыйДокумент.Услуга = Справочники.Услуги.НайтиПоКоду("0000000029");
ИначеЕсли Отправитель = "*******@**k.ua" Тогда
НовыйДокумент.Услуга = Справочники.Услуги.НайтиПоКоду("0000000029");
НовыйДокумент.Ответственный = Справочники.Сотрудники.НайтиПоКоду("0000000063");
КонецЕсли;
alexinzaz,
23 Мая 2014
−85
c1 = true
c2 = true
c3 = true
c4 = true
c5 = true
c6 = true
c7 = true
c8 = true
c9 = true
c10 = true
c11 = true
c12 = true
c13 = true
next = true
function goForward()
c1 = c2
c2 = c3
c3 = c4
c4 = c5
c5 = c6
c6 = c7
c7 = c8
c8 = c9
c9 = c10
c10 = c11
c11 = c12
c12 = c13
c13 = next
endНемножко Lua-кода от геймдизайнера.
kostoprav,
23 Мая 2014
+144
"Если не заходит на Веб мани,есть выход."
звучит, как тонкий афоризм :)
Вот только автор его не философ, а какое-то школоло.http://zismo.biz/forum/13-481526-1
brutushafens,
23 Мая 2014
+68
class CircuitBreaker
{
boolean broken = false;
CircuitBreaker() {}
private void breakCircuit()
{
this.broken = true;
}
private boolean isBroken()
{
return this.broken;
}
}
private boolean writeAssetsToDisk()
{
CircuitBreaker breaker = new CircuitBreaker();
writeBase64EncodedAssetToDisk(breaker, "...", getPath(...));
writeBase64EncodedAssetToDisk(breaker, "...", getPath(...));
writeBase64EncodedAssetToDisk(breaker, "...", getPath(...));
writeBase64EncodedAssetToDisk(breaker, "...", getPath(...));
return !breaker.isBroken();
}
private void writeBase64EncodedAssetToDisk(CircuitBreaker breaker, String base64String, String filename)
{
if (breaker.isBroken()) {
return;
}
...
try
{
...
}
catch (IOException e)
{
breaker.breakCircuit(); return;
}
...
}Используй исключения, Люк. Фрагмент из Amazon Mobile Ads SDK.
chaoswithin,
23 Мая 2014
+126
[ 1, 2, 3, 4 ].map!("a + a")
//...
"{ " ~ [1, 2, 3, 4].map!(to!string).join(", ") ~ " }"
LispGovno,
23 Мая 2014
Follow us!