From b808c255b6a9ddba085bf5646e7d20ec344f2e2d Mon Sep 17 00:00:00 2001
From: Boris Kolpackov <boris@codesynthesis.com>
Date: Tue, 28 Apr 2020 08:48:53 +0200
Subject: Initial support for ad hoc recipes (still work in progress)

---
 .../script/lexer+command-expansion.test.testscript | 321 +++++++++++++++++++++
 1 file changed, 321 insertions(+)
 create mode 100644 libbuild2/script/lexer+command-expansion.test.testscript

(limited to 'libbuild2/script/lexer+command-expansion.test.testscript')

diff --git a/libbuild2/script/lexer+command-expansion.test.testscript b/libbuild2/script/lexer+command-expansion.test.testscript
new file mode 100644
index 0000000..f4d69d2
--- /dev/null
+++ b/libbuild2/script/lexer+command-expansion.test.testscript
@@ -0,0 +1,321 @@
+# file      : libbuild2/script/lexer+command-expansion.test.testscript
+# license   : MIT; see accompanying LICENSE file
+
+test.arguments = command-expansion
+
+: pass-redirect
+:
+{
+  : in
+  :
+  $* <:"0<|" >>EOO
+  '0'
+  <|
+  EOO
+
+  : arg-in
+  :
+  $* <:"0 <|" >>EOO
+  '0 '
+  <|
+  EOO
+
+  : out
+  :
+  $* <:"1>|" >>EOO
+  '1'
+  >|
+  EOO
+
+  : arg-out
+  :
+  $* <:"1 >|" >>EOO
+  '1 '
+  >|
+  EOO
+}
+
+: null-redirect
+:
+{
+  : in
+  :
+  $* <:"0<-" >>EOO
+  '0'
+  <-
+  EOO
+
+  : arg-in
+  :
+  $* <:"0 <-" >>EOO
+  '0 '
+  <-
+  EOO
+
+  : out
+  :
+  $* <:"1>-" >>EOO
+  '1'
+  >-
+  EOO
+
+  : arg-out
+  :
+  $* <:"1 >-" >>EOO
+  '1 '
+  >-
+  EOO
+}
+
+: trace-redirect
+:
+{
+  : out
+  :
+  $* <:"1>!" >>EOO
+  '1'
+  >!
+  EOO
+
+  : arg-out
+  :
+  $* <:"1 >!" >>EOO
+  '1 '
+  >!
+  EOO
+}
+
+: merge-redirect
+:
+{
+  : out
+  :
+  $* <:"1>&2" >>EOO
+  '1'
+  >&
+  '2'
+  EOO
+
+  : arg-out
+  :
+  $* <:"1 >&2" >>EOO
+  '1 '
+  >&
+  '2'
+  EOO
+}
+
+: str-redirect
+:
+{
+  : in
+  :
+  {
+    : newline
+    :
+    $* <:"0<<<=a b" >>EOO
+    '0'
+    <<<=
+    'a b'
+    EOO
+
+    : no-newline
+    :
+    $* <:"0<<<=:a b" >>EOO
+    '0'
+    <<<=:
+    'a b'
+    EOO
+  }
+
+  : in-alias
+  :
+  {
+    : newline
+    :
+    $* <:"0<<<a b" >>EOO
+    '0'
+    <<<
+    'a b'
+    EOO
+
+    : no-newline
+    :
+    $* <:"0<<<:a b" >>EOO
+    '0'
+    <<<:
+    'a b'
+    EOO
+  }
+
+  : out
+  :
+  {
+    : newline
+    :
+    $* <:"1>>>?a b" >>EOO
+    '1'
+    >>>?
+    'a b'
+    EOO
+
+    : no-newline
+    :
+    $* <:"1>>>?:a b" >>EOO
+    '1'
+    >>>?:
+    'a b'
+    EOO
+  }
+}
+
+: doc-redirect
+:
+{
+  : in
+  :
+  {
+    : newline
+    :
+    $* <:"0<<=E O I" >>EOO
+    '0'
+    <<=
+    'E O I'
+    EOO
+
+    : no-newline
+    :
+    $* <:"0<<=:E O I" >>EOO
+    '0'
+    <<=:
+    'E O I'
+    EOO
+  }
+
+  : in-alias
+  :
+  {
+    : newline
+    :
+    $* <:"0<<E O I" >>EOO
+    '0'
+    <<
+    'E O I'
+    EOO
+
+    : no-newline
+    :
+    $* <:"0<<:E O I" >>EOO
+    '0'
+    <<:
+    'E O I'
+    EOO
+  }
+
+  : out
+  :
+  {
+    : newline
+    :
+    $* <:"1>>?E O O" >>EOO
+    '1'
+    >>?
+    'E O O'
+    EOO
+
+    : no-newline
+    :
+    $* <:"1>>?:E O O" >>EOO
+    '1'
+    >>?:
+    'E O O'
+    EOO
+  }
+}
+
+: file-redirect
+:
+{
+  : in
+  :
+  $* <:"0<=a b" >>EOO
+  '0'
+  <=
+  'a b'
+  EOO
+
+  : in-alias
+  :
+  $* <:"0<a b" >>EOO
+  '0'
+  <
+  'a b'
+  EOO
+
+  : out
+  :
+  $* <:"1>=a b" >>EOO
+  '1'
+  >=
+  'a b'
+  EOO
+
+ : out-alias
+  :
+  $* <:"1>a b" >>EOO
+  '1'
+  >
+  'a b'
+  EOO
+
+  : out-app
+  :
+  $* <:"1>+a b" >>EOO
+  '1'
+  >+
+  'a b'
+  EOO
+
+  : out-app-alias
+  :
+  $* <:"1>>a b" >>EOO
+  '1'
+  >>
+  'a b'
+  EOO
+}
+
+: no-out-alias
+:
+$* <:"1>>>a b" >>EOO
+'1'
+>>
+>
+'a b'
+EOO
+
+
+: cleanup
+:
+{
+  : always
+  :
+  $* <:"&file" >>EOO
+  &
+  'file'
+  EOO
+
+  : maybe
+  :
+  $* <:"&?file" >>EOO
+  &?
+  'file'
+  EOO
+
+  : never
+  :
+  $* <:"&!file" >>EOO
+  &!
+  'file'
+  EOO
+}
-- 
cgit v1.1