Sun God
Sun God
Like `ASR.asdl`, we can have `Intrinsics.asdl`, represent each intrinsics as nodes, members as arguments, result as the last argument and generate create_intrinsics, ... @certik Would it be worth a try?
Now, the ASR generated for the example is: Example: ```fortran !$omp parallel private(partial_sum) shared(total_sum) !$omp do do i = 1, n partial_sum = partial_sum + a(i) end do !$omp end...
But, how do we handle the following, ```fortran !$omp parallel private(partial_sum) shared(total_sum) !$omp do do i = 1, n partial_sum = partial_sum + a(i) end do !$omp end do !$omp...
Consider an example: ```fortran [...] !$omp do do i = 2, n print *, omp_get_thread_num(), i b(i) = (a(i) + a(i-1)) / 2.0 end do !$omp end do [...] ```...
Yup, totally agreed!
My bad, I won't allow `openmp` support by default. One has to pass `--openmp` option to enable openmp. Otherwise it will be considered as comments. I will make the required...
Thanks for the review, can you please merge it? Thank you!
The array issue seems to be fixed, the following works: ```fortran program parameter_10 implicit none integer, parameter :: N = 10 integer, parameter :: dp = kind(1.d0) real(dp), parameter ::...
I'm thinking of separating the compile time evaluation from `ast_to_asr_visitor` to a new file. We will visit all the AST nodes and create the corresponding ASR. Now, we will `TranslationUnit`...