package autofonce_core

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
type check_output =
  1. | Ignore
  2. | Content of string
type step = string
type check = {
  1. check_loc : location;
  2. check_step : step;
  3. check_command : string;
  4. check_retcode : int option;
  5. check_stdout : check_output;
  6. check_stderr : check_output;
  7. check_run_if_fail : action list;
  8. check_run_if_pass : action list;
  9. check_kind : string;
  10. check_test : test;
}
and action =
  1. | AT_DATA of {
    1. file : string;
    2. content : string;
    }
  2. | AT_CAPTURE_FILE of string
  3. | AT_XFAIL
  4. | AT_XFAIL_IF of {
    1. step : step;
    2. loc : location;
    3. command : string;
    }
  5. | AT_FAIL of {
    1. loc : location;
    }
  6. | AT_FAIL_IF of {
    1. step : step;
    2. loc : location;
    3. command : string;
    }
  7. | AT_SKIP
  8. | AT_SKIP_IF of {
    1. step : step;
    2. loc : location;
    3. command : string;
    }
  9. | AT_CHECK of check
  10. | AT_CLEANUP of {
    1. loc : location;
    }
  11. | AF_ENV of string
  12. | AF_COPY of {
    1. step : step;
    2. loc : location;
    3. files : string list;
    4. command : string;
    5. copy : bool;
    6. promote : bool;
    }
and test = {
  1. test_suite : suite;
  2. test_loc : location;
  3. test_name : string;
  4. test_id : int;
  5. test_banner : string;
  6. test_env : string;
  7. test_subst : string list;
  8. mutable test_keywords : string list;
  9. mutable test_actions : action list;
}
and suite = {
  1. suite_file : string;
  2. suite_dir : string;
  3. mutable suite_ntests : int;
  4. suite_test_by_id : (int, test) Stdlib.Hashtbl.t;
  5. mutable suite_tests : test list;
  6. mutable suite_tested_programs : string list;
  7. mutable suite_name : string;
  8. mutable suite_banners : string list;
}
val string_of_location : Autofonce_m4.M4Types.location -> string
val string_of_action : action -> string
val string_of_check_output : check_output -> string
val string_of_runif : action list -> string
val string_of_check : check -> string