szaghi / forbear Goto Github PK

I've tried to compile this library with AMD's aocc flang but I'm having the following error:

F90-F-0000-Internal compiler error. no type conversion available       0  (build/dependencies/forbear/src/lib/forbear_bar_object.F90: 294)
F90/x86-64  Flang - 1.5 2017-05-01: compilation aborted

The shown line (294) is just the end of a subroutine so it is not the actual error.

I'm not in any hurry for running my codes with flang, but just wanted you to know just in case :)

I've copied the spinner line from the tests but when I run my code the spinner doesn't overwrite in place so I get a bunch of lines:

In a long run (7 minutes), instead of one progress bar, 12 appear

Actual code:

      call bar%initialize(filled_char_string='㊂', empty_char_string='●',&
         suffix_string='| ', add_progress_percent=.true.,prefix_string='Progress |',&
         scale_bar_color_fg='blue', scale_bar_style='underline_on', spinner_string='(  ●   )')

Since there haven't been any activity in years maybe this issue won't have much impact. But this seems like a nice project worth reliving!

For starters I recommend making it fpm-compatible (https://fpm.fortran-lang.org/) so it's easily accessible for other projects. A bit of promotion on https://fortran-lang.discourse.group/ could help into getting collaborators too :)

When Max_value is higher than 99 the bar only shows ***** instead of the actual number

Actual code:

      lt1 = 100
      call bar%initialize(filled_char_string='+', prefix_string='Progress |',&
         suffix_string='| ', add_progress_percent=.true.,&
         min_value=real(1,kind=8), max_value=real(lt1, kind=8),&
         add_progress_speed=.true., progress_speed_color_fg='green',&
         add_date_time=.true., date_time_color_fg='magenta', add_scale_bar=.true.,&
         scale_bar_color_fg='blue', scale_bar_style='underline_on')

Projects with awesome bars/spinners from which take inspiration:

• https://github.com/sindresorhus/cli-spinners
• https://github.com/briandowns/spinner
• https://github.com/piotrmurach/tty-spinner
• https://github.com/henrik/progress_bar
• https://github.com/hfaran/progressive

Dear Stefano,

at first, many thanks for such nice fortran enhancement )

And to the question. From a practical point of view I would combine multiple (in that case forbear_x + FACE) modules into one single module file for such sort of utility. Really, it would be my first step if I consider to include it into my projects... It also doesn't make sense (IMHO) to create a library for such small things. (Sure, I know that you are using fobis, but unfortunately, some developers are forced to stay with an old good make because there are projects where 2 and more languages are used and fortran is only one among them... )

Please ignore this completely, if it is important for you to have these multiple modules during development, or you intend to create some extended library full of such fancy fortran things)

Hi Stefano,

Very cool project!

I noticed you were interested in adding a spinner (in the README.md TODO list) and I was thinking it would be very nice to have ISO 10646 character support, then you can have fancy characters in your spinners and progress bars like this:

It's a bit of a pain though, because you may need to detect if ISO 10646 support is available on the "system" (compiler + machine) and then create overloaded interface wrappers that will accept ASCII, and convert to ISO 10646 characters and pass them to the routines. (Or you could just force everyone to pass in ISO 10646 chars but that may not be practical.)

Here is some code to declare an ISO 10646 variable:

integer, parameter :: ucs4 = selected_char_kind('ISO_10646')
character(*, ucs4), intent(out) :: string

See also:

• https://github.com/jacobwilliams/json-fortran/blob/master/src/json_macros.inc
• https://github.com/jacobwilliams/json-fortran/blob/master/src/json_string_utilities.F90#L21-L59
• https://github.com/jacobwilliams/json-fortran/blob/master/src/json_string_utilities.F90#L572-L714
• https://github.com/jacobwilliams/json-fortran/blob/master/src/json_kinds.F90#L1-L36
• https://github.com/jacobwilliams/json-fortran/blob/master/src/json_kinds.F90#L93-L132
• https://github.com/jacobwilliams/json-fortran/blob/master/src/json_value_module.F90