Packages

gleeunit

0.1.0
1.11.0 1.10.0 1.9.0 1.8.0 1.7.0 1.6.1 1.6.0 1.5.1 1.5.0 1.4.0 1.3.1 1.3.0 1.2.0 1.1.2 1.0.2 1.0.1 1.0.0 0.11.0 0.10.1 0.10.0 0.9.0 0.8.0 0.7.2 0.7.1 0.7.0 0.6.2 0.6.1 0.6.0 0.5.1 0.5.0 0.4.0 0.3.0 0.2.0 0.1.0

A simple test runner for Gleam, using EUnit on Erlang

HexDocs

Current section

Files

Jump to
Readme
34 Versions
1 Dependency
7 Dependants
Files
Activity
gleeunit src gleeunit.gleam
Raw

src/gleeunit.gleam 

import gleam/list

import gleam/string

import gleam/dynamic.{Dynamic}

import gleam/io



pub fn discover_and_run_tests() -> Nil {

  let options = [

    Verbose,

    NoTty,

    Report(#(

      dangerously_convert_string_to_atom("gleeunit_progress"),

      [dynamic.from(#(dangerously_convert_string_to_atom("colored"), True))],

    )),

  ]



  find_files(matching: "**/*.{erl,gleam}", in: "test")

  |> list.map(remove_extension)

  |> list.map(dangerously_convert_string_to_atom)

  |> run_eunit(options)



  Nil

}



fn remove_extension(path: String) -> String {

  path

  |> string.replace(".gleam", "")

  |> string.replace(".erl", "")

  |> string.replace("/", "@")

}



external fn find_files(matching: String, in: String) -> List(String) =

  "gleeunit_ffi" "find_files"



external type Atom



external fn dangerously_convert_string_to_atom(String) -> Atom =

  "erlang" "binary_to_atom"



type EunitOption {

  Verbose

  NoTty

  Report(#(Atom, List(Dynamic)))

}



// NoTty

external fn run_eunit(List(Atom), List(EunitOption)) -> Dynamic =

  "eunit" "test"