tests.0rt

/* -----------------------------------------------------------------------------
Copyright 2020 Kevin P. Barry

Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at

    http://www.apache.org/licenses/LICENSE-2.0

Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
See the License for the specific language governing permissions and
limitations under the License.
----------------------------------------------------------------------------- */

// Author: Kevin P. Barry [ta0kira@gmail.com]

testcase "checkEquals success" {
  success
}

unittest test {
  \ Testing.checkEquals<?>(13,13)
}


testcase "checkEquals fail" {
  crash
  require stderr "13"
  require stderr "15"
}

unittest test {
  \ Testing.checkEquals<?>(13,15)
}


testcase "checkEmpty success" {
  success
}

unittest test {
  \ Testing.checkEmpty(empty)
}


testcase "checkEmpty fail" {
  crash
  require stderr "13"
  require stderr "empty"
}

unittest test {
  \ Testing.checkEmpty(13)
}


testcase "checkPresent success" {
  success
}

unittest test {
  \ Testing.checkPresent(13)
}


testcase "checkPresent fail" {
  crash
  require stderr "empty"
}

unittest test {
  \ Testing.checkPresent(empty)
}


testcase "checkOptional success" {
  success
}

unittest test {
  \ Testing.checkOptional<Int>(empty,empty)
  \ Testing.checkOptional<?>(13,13)
}


testcase "checkOptional fail empty" {
  crash
  require stderr "13"
  require stderr "empty"
}

unittest test {
  \ Testing.checkOptional<?>(13,empty)
}


testcase "checkOptional fail present" {
  crash
  require stderr "13"
  require stderr "empty"
}

unittest test {
  \ Testing.checkOptional<?>(empty,13)
}


testcase "checkBetween success" {
  success
}

unittest test {
  \ Testing.checkBetween<?>(13,13,15)
}


testcase "checkBetween fail" {
  crash
  require stderr "13"
  require stderr "14"
  require stderr "15"
}

unittest test {
  \ Testing.checkBetween<?>(13,14,15)
}


testcase "checkBetween bad range" {
  crash
  exclude stderr "14"
  require stderr "13"
  require stderr "15"
}

unittest test {
  \ Testing.checkBetween<?>(14,15,13)
}