Форум » GUI » Minigui для Harbour 3.4 и Embarcadero’s 32-bit BCC 7.3 compiler » Ответить
Minigui для Harbour 3.4 и Embarcadero’s 32-bit BCC 7.3 compiler
gfilatov2002: Я подготовил Харбор версии3.4 (форк Виктора Закатца) для вышеуказанного компилятора Сам Си-компилятор (evaluation only!) брал на сайте http://whosaway.com. Меня интересует: есть ли интерес у сообщества программистов в портировании библиотеки Минигуи для работы с этим компилятором Ваши комментарии приветствуются
Ответов - 7
gfilatov2002: Ниже приведены для сравнения результаты скорости работы Харбора на одном и том же компьютере для BCC 5.5 и BCC 7.3 [pre2]2018-06-30 19:32:06 Windows 7 6.1 SP1 Harbour 3.2.0dev (r1806032230) Borland C++ 5.5.1 (32-bit) x86 THREADS: 0 N_LOOPS: 1000000 [ T000: empty loop overhead ]...................................0.03 ==================================================================== [ T001: x := L_C ]..............................................0.05 [ T002: x := L_N ]..............................................0.02 [ T003: x := L_D ]..............................................0.03 [ T004: x := S_C ]..............................................0.05 [ T005: x := S_N ]..............................................0.05 [ T006: x := S_D ]..............................................0.05 [ T007: x := M->M_C ]...........................................0.05 [ T008: x := M->M_N ]...........................................0.06 [ T009: x := M->M_D ]...........................................0.05 [ T010: x := M->P_C ]...........................................0.05 [ T011: x := M->P_N ]...........................................0.05 [ T012: x := M->P_D ]...........................................0.05 [ T013: x := F_C ]..............................................0.03 [ T014: x := F_N ]..............................................0.03 [ T015: x := F_D ]..............................................0.03 [ T016: x := o:Args ]...........................................0.16 [ T017: x := o[ 2 ] ]...........................................0.11 [ T018: Round( i / 1000, 2 ) ]..................................0.23 [ T019: Str( i / 1000 ) ].......................................0.61 [ T020: Val( s ) ]..............................................0.25 [ T021: Val( a [ i % 16 + 1 ] ) ]...............................0.39 [ T022: DToS( d - i % 10000 ) ].................................0.59 [ T023: Eval( {|| i % 16 } ) ]..................................0.37 [ T024: Eval( bc := {|| i % 16 } ) ]............................0.22 [ T025: Eval( {| x | x % 16 }, i ) ]............................0.31 [ T026: Eval( bc := {| x | x % 16 }, i ) ]......................0.23 [ T027: Eval( {| x | f1( x ) }, i ) ]...........................0.34 [ T028: Eval( bc := {| x | f1( x ) }, i ) ].....................0.28 [ T029: Eval( bc := &( "{| x | f1( x ) }" ), i ) ]..............0.30 [ T030: x := &( "f1(" + Str( i ) + ")" ) ]......................2.26 [ T031: bc := &( "{| x | f1( x ) }" ), Eval( bc, i ) ]..........2.89 [ T032: x := ValType( x ) + ValType( i ) ]......................0.33 [ T033: x := StrZero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........0.69 [ T034: x := a[ i % 16 + 1 ] == s ].............................0.27 [ T035: x := a[ i % 16 + 1 ] = s ]..............................0.31 [ T036: x := a[ i % 16 + 1 ] >= s ].............................0.30 [ T037: x := a[ i % 16 + 1 ] <= s ].............................0.31 [ T038: x := a[ i % 16 + 1 ] < s ]..............................0.30 [ T039: x := a[ i % 16 + 1 ] > s ]..............................0.31 [ T040: AScan( a, i % 16 ) ]....................................0.28 [ T041: AScan( a, {| x | x == i % 16 } ) ]......................2.46 [ T042: iif( i % 1000 == 0, a := {}, ), AAdd(a,{i,1,.T.,s, ]....0.75 [ T043: x := a ]................................................0.05 [ T044: x := {} ]...............................................0.12 [ T045: f0() ]..................................................0.05 [ T046: f1( i ) ]...............................................0.12 [ T047: f2( c[1...8] ) ]........................................0.09 [ T048: f2( c[1...40000] ) ]....................................0.09 [ T049: f2( @c[1...40000] ) ]...................................0.08 [ T050: f2( @c[1...40000] ), c2 := c ]..........................0.11 [ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................0.37 [ T052: f2( a ) ]...............................................0.11 [ T053: x := f4() ].............................................0.59 [ T054: x := f5() ].............................................0.20 [ T055: x := Space( 16 ) ]......................................0.17 [ T056: f_prv( c ) ]............................................0.31 ==================================================================== [ total application time: ]....................................20.70 [ total real time: ]...........................................20.76 2018-07-08 21:04:45 Windows 7 6.1 SP1 Harbour 3.4.0dev () (2017-12-20 13:40) Borland/Embarcadero C++ 7.3 (32-bit) x86 THREADS: 0 N_LOOPS: 1000000 [ T000: empty loop overhead ]...................................0.03 ==================================================================== [ T001: x := L_C ]..............................................0.05 [ T002: x := L_N ]..............................................0.02 [ T003: x := L_D ]..............................................0.03 [ T004: x := S_C ]..............................................0.06 [ T005: x := S_N ]..............................................0.05 [ T006: x := S_D ]..............................................0.05 [ T007: x := M->M_C ]...........................................0.06 [ T008: x := M->M_N ]...........................................0.05 [ T009: x := M->M_D ]...........................................0.05 [ T010: x := M->P_C ]...........................................0.06 [ T011: x := M->P_N ]...........................................0.05 [ T012: x := M->P_D ]...........................................0.05 [ T013: x := F_C ]..............................................0.16 [ T014: x := F_N ]..............................................0.22 [ T015: x := F_D ]..............................................0.12 [ T016: x := o:Args ]...........................................0.16 [ T017: x := o[ 2 ] ]...........................................0.11 [ T018: Round( i / 1000, 2 ) ]..................................0.23 [ T019: Str( i / 1000 ) ].......................................1.05 [ T020: Val( s ) ]..............................................0.25 [ T021: Val( a [ i % 16 + 1 ] ) ]...............................0.51 [ T022: DToS( d - i % 10000 ) ].................................0.64 [ T023: Eval( {|| i % 16 } ) ]..................................0.37 [ T024: Eval( bc := {|| i % 16 } ) ]............................0.22 [ T025: Eval( {| x | x % 16 }, i ) ]............................0.31 [ T026: Eval( bc := {| x | x % 16 }, i ) ]......................0.23 [ T027: Eval( {| x | f1( x ) }, i ) ]...........................0.36 [ T028: Eval( bc := {| x | f1( x ) }, i ) ].....................0.28 [ T029: Eval( bc := &( "{| x | f1( x ) }" ), i ) ]..............0.31 [ T030: x := &( "f1(" + Str( i ) + ")" ) ]......................2.01 [ T031: bc := &( "{| x | f1( x ) }" ), Eval( bc, i ) ]..........2.54 [ T032: x := ValType( x ) + ValType( i ) ]......................0.33 [ T033: x := StrZero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..........0.94 [ T034: x := a[ i % 16 + 1 ] == s ].............................0.31 [ T035: x := a[ i % 16 + 1 ] = s ]..............................0.36 [ T036: x := a[ i % 16 + 1 ] >= s ].............................0.34 [ T037: x := a[ i % 16 + 1 ] <= s ].............................0.36 [ T038: x := a[ i % 16 + 1 ] < s ]..............................0.34 [ T039: x := a[ i % 16 + 1 ] > s ]..............................0.36 [ T040: AScan( a, i % 16 ) ]....................................0.30 [ T041: AScan( a, {| x | x == i % 16 } ) ]......................2.57 [ T042: iif( i % 1000 == 0, a := {}, ), AAdd(a,{i,1,.T.,s, ]....0.76 [ T043: x := a ]................................................0.05 [ T044: x := {} ]...............................................0.11 [ T045: f0() ]..................................................0.06 [ T046: f1( i ) ]...............................................0.11 [ T047: f2( c[1...8] ) ]........................................0.11 [ T048: f2( c[1...40000] ) ]....................................0.09 [ T049: f2( @c[1...40000] ) ]...................................0.08 [ T050: f2( @c[1...40000] ), c2 := c ]..........................0.09 [ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]....................0.37 [ T052: f2( a ) ]...............................................0.11 [ T053: x := f4() ].............................................0.44 [ T054: x := f5() ].............................................0.22 [ T055: x := Space( 16 ) ]......................................0.17 [ T056: f_prv( c ) ]............................................0.31 ==================================================================== [ total application time: ]....................................21.70 [ total real time: ]...........................................21.75 [/pre2]
Andrey: А по скорости сборки больших проектов разница во времени есть ?
gfilatov2002: Andrey пишет: по скорости сборки больших проектов разница Скорость сборки примерно как у BCC 5.5, не хуже
Vlad04: Возможно, имеет смысл вообще переход BCC 7.3. Артефактов с новыми операционными системами станет меньше. Но Ide то же перевести
SergKis: Т.е. будет 2е ветки ? - hb 3.2 + hmg + BCC 5.2 - hb 3.4 + hmg + BCC 7.3 с особенностями
Andrey: gfilatov2002 пишет: Сам Си-компилятор (evaluation only!) брал на сайте http://whosaway.com. А что за лицензия такая ? Нужно желательно иметь свободную лицензию. У нас для госорганов и муниципалок это нужно. Может быть лучше Microsoft C взять, он же свободный... А кратко о (форк Виктора Закатца) можно получить информацию ? Что-то слышал об нём, но уже не помню.
gfilatov2002: SergKis пишет: будет 2е ветки ? Этого хотелось бы избежать... Andrey пишет: что за лицензия такая ? Это платный продукт, который идет в составе BCC Builder (минимальная цена на который составляет $359.00). Andrey пишет: кратко о (форк Виктора Закатца) можно получить информацию ? Это ответвление Харбора от одного из основных разработчиков этого продукта, автора утилиты hbmk2. Официально поддерживает под Windows только 4 Си-компилятора: clang (основной), mingw, msvc и watcom. Разработка форка завершена в декабре прошлого года (это завершенный продукт).
полная версия страницы