Skip to content

missing padding by leading zeroes, where applicable #126

Description

@nbehrnd

The submission of the following snippet of code

program test
   implicit none(external)
   integer :: a, square

   do a = 1, 5
      square = a ** 2
      write (*, "(2(I3.3, 1x))") a, square
   end do
 
end program test

to LFORTRAN (commit b5e05bd3a) results in frame STDOUT the output of

1 1
2 4
3 9
4 16
5 25

Compilation time: 95 ms
Execution time: 1 ms

This contrasts with my expectation to 1) yield columns of constant width aligned to the right hand side, and 2) a padding with leading zeroes (001, 016, etc) where applicable.

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    No type

    Fields

    No fields configured for issues without a type.

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions