From dbf37dc16ad9549ce5a1021c74fe369ab2e0d917 Mon Sep 17 00:00:00 2001
From: Boris Kolpackov <boris@codesynthesis.com>
Date: Fri, 30 Sep 2022 05:15:58 +0200
Subject: Move integer and bool function to separate source/testscript files

---
 tests/function/builtin/testscript | 41 ++-------------------------------------
 1 file changed, 2 insertions(+), 39 deletions(-)

(limited to 'tests/function/builtin/testscript')

diff --git a/tests/function/builtin/testscript b/tests/function/builtin/testscript
index 3c430d7..714a38d 100644
--- a/tests/function/builtin/testscript
+++ b/tests/function/builtin/testscript
@@ -77,43 +77,6 @@
   $* <'print $type($identity(abc))'            >''         : untyped
 }
 
-: integer-sequence
-:
-{
-  $* <'print $integer_sequence(1, 3)'    >'1 2'     : basics
-  $* <'print $integer_sequence(1, 0)'    >''        : empty
-  $* <'print $integer_sequence(0, 8, 2)' >'0 2 4 6' : step
-}
-
-: string
-:
-{
-  $* <'print $string([uint64] 0xffff)'        >'65535'      : uint
-  $* <'print $string([uint64] 0xffff, 16)'    >'0xffff'     : uint-hex
-  $* <'print $string([uint64] 0xffff, 16, 8)' >'0x0000ffff' : uint-hex-width
-}
-
-: sort
-:
-{
-  $* <'print $sort([uint64s] 0 2 1 000)'        >'0 0 1 2' : basics
-  $* <'print $sort([uint64s] 0 2 1 000, dedup)' >'0 1 2'   : dedup
-}
-
-: find
-:
-{
-  $* <'print $find([uint64s] 1 2 3, 2)' >'true'  : basics-true
-  $* <'print $find([uint64s] 1 2 3, 0)' >'false' : basics-false
-}
-
-: find_index
-:
-{
-  $* <'print $find_index([int64s] -1 -2 -3, -2)' >'1' : basics-true
-  $* <'print $find_index([int64s] -1 -2 -3,  0)' >'3' : basics-false
-}
-
 : getenv
 :
 {
@@ -123,8 +86,8 @@
   : likely is set at the time of login, and on Windows it is set by build2 on
   : startup.
   :
-  : @@ Use a custom variable, when an ability to set environment variables in
-  :    testscript is implemented.
+  : @@ TMP Use a custom variable, when an ability to set environment variables
+  :    in testscript is implemented. It is now!
   :
   {
     : string
-- 
cgit v1.1