get_parquet_maml Function

public function get_parquet_maml(name) result(maml)

Returns the named embedded .maml fixture from schemas/ as a raw parquet_maml_file (unparsed lines only); error stops on an unknown name. A fixture is matched by its filename, with or without the .maml extension; one held in a subdirectory is also matched by its full relative path.

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: name

embedded fixture name, with or without .maml.

Return Value type(parquet_maml_file)

the matching MAML, unparsed (raw lines only).


Source Code

    function get_parquet_maml(name) result(maml)
        character(len=*), intent(in) :: name !! embedded fixture name, with or without .maml.
        type(parquet_maml_file) :: maml !! the matching MAML, unparsed (raw lines only).

        select case (trim(name))
        case ("maml_example.maml")
            maml = parquet_maml_maml_example()
        case ("maml_example")
            maml = parquet_maml_maml_example()
        case ("maml_example2.maml")
            maml = parquet_maml_maml_example2()
        case ("maml_example2")
            maml = parquet_maml_maml_example2()
        case ("maml_example3.maml")
            maml = parquet_maml_maml_example3()
        case ("maml_example3")
            maml = parquet_maml_maml_example3()
        case default
            error stop "get_parquet_maml: unknown internal MAML file: " // trim(name)
        end select
    end function get_parquet_maml