Move old tests to old-tests/

2 files changed, 0 insertions, 204 deletions

diff --git a/tests/parser/buildfile b/tests/parser/buildfile
deleted file mode 100644
index ec158fa..0000000
--- a/tests/parser/buildfile
+++ /dev/null
@@ -1,9 +0,0 @@
-# file      : tests/parser/buildfile
-# copyright : Copyright (c) 2014-2016 Code Synthesis Ltd
-# license   : MIT; see accompanying LICENSE file
-
-import libs = libbutl%lib{butl}
-
-exe{driver}: cxx{driver ../../build/{token lexer parser scope target \
- prerequisite variable operation rule search algorithm file module dump \
- context diagnostics name path-io utility}} $libs
diff --git a/tests/parser/driver.cxx b/tests/parser/driver.cxx
deleted file mode 100644
index 7c73937..0000000
--- a/tests/parser/driver.cxx
+++ /dev/null
@@ -1,195 +0,0 @@
-// file      : tests/build/parser/driver.cxx -*- C++ -*-
-// copyright : Copyright (c) 2014-2016 Code Synthesis Ltd
-// license   : MIT; see accompanying LICENSE file
-
-#include <cassert>
-#include <sstream>
-#include <iostream>
-
-#include <build/types>
-#include <build/scope>
-#include <build/target>
-#include <build/context>
-#include <build/variable>
-
-#include <build/lexer>
-#include <build/parser>
-
-using namespace std;
-using namespace build;
-
-static bool
-parse (const char*);
-
-static names
-parse_names (const char* s, lexer_mode m, bool chunk);
-
-static names
-chunk_names (const char* s)
-{
-  return parse_names (s, lexer_mode::pairs, true);
-}
-
-int
-main ()
-{
-  ostream cnull (nullptr);
-  diag_stream = &cnull;
-
-  reset ();
-
-  global_scope->assign ("foo") = "FOO";
-  global_scope->assign ("bar") = "BAR";
-
-  // names() in chunking mode.
-  //
-  assert (chunk_names ("{}") == names ({name ()}));
-  assert (chunk_names ("foo") == names ({name ("foo")}));
-  assert (chunk_names ("foo bar") == names ({name ("foo")}));
-  assert (chunk_names ("{foo bar}") == names ({name ("foo"), name ("bar")}));
-  assert (chunk_names ("dir{foo bar}") == names ({name ("dir", "foo"),
-                                                  name ("dir", "bar")}));
-  assert (chunk_names ("dir{foo bar} baz") == names ({name ("dir", "foo"),
-                                                      name ("dir", "bar")}));
-  assert (chunk_names ("dir {foo bar}") == names ({name ("dir", "foo"),
-                                                   name ("dir", "bar")}));
-  assert (chunk_names ("dir {foo bar} baz") == names ({name ("dir", "foo"),
-                                                       name ("dir", "bar")}));
-  assert (chunk_names ("{} foo") == names ({name ()}));
-
-  // Expansion.
-  //
-  assert (chunk_names ("$foo $bar baz") == names ({name ("FOO")}));
-  assert (chunk_names ("$foo$bar baz") == names ({name ("FOOBAR")}));
-
-  assert (chunk_names ("foo(bar)") == names ({name ("foobar")}));
-  assert (chunk_names ("foo (bar)") == names ({name ("foo")}));
-
-  assert (chunk_names ("\"$foo\"(bar)") == names ({name ("FOObar")}));
-  assert (chunk_names ("\"$foo\" (bar)") == names ({name ("FOO")}));
-
-  // Quoting.
-  //
-  assert (chunk_names ("\"$foo $bar\" baz") == names ({name ("FOO BAR")}));
-
-  // Pairs.
-  //
-  assert (chunk_names ("foo=bar") == names ({name ("foo"), name ("bar")}));
-  assert (chunk_names ("foo = bar x") == names ({name ("foo"), name ("bar")}));
-
-  // General.
-  //
-  assert (parse (""));
-  assert (parse ("foo:"));
-  assert (parse ("foo bar:"));
-  assert (parse ("foo:\nbar:"));
-  assert (parse ("foo: bar"));
-  assert (parse ("foo: bar baz"));
-  assert (parse ("foo bar: baz biz"));
-
-  assert (parse ("{foo}:"));
-  assert (parse ("{foo bar}:"));
-  assert (parse ("{{foo bar}}:"));
-  assert (parse ("{{foo bar} {baz} {biz fox} fix}:"));
-
-  assert (parse ("file{foo}:"));
-  assert (parse ("file{foo bar}:"));
-  assert (parse ("{file{foo bar}}:"));
-  assert (parse ("file{{foo bar} fox}:"));
-  assert (parse ("file{foo}: file{bar baz} biz.o file{fox}"));
-
-  //assert (!parse (":"));
-  assert (!parse ("foo"));
-  assert (!parse ("{"));
-  assert (!parse ("{foo:"));
-  assert (!parse ("{foo{:"));
-  assert (!parse ("foo: bar:"));
-  assert (!parse ("file{foo:"));
-
-  // Directory prefix.
-  //
-  assert (parse ("../{foo}: ../{bar}"));
-  assert (parse ("../file{foo}: ../file{bar}"));
-  assert (!parse ("../file{file{foo}}:"));
-
-  // Directory scope.
-  //
-  assert (parse ("test/:\n{\n}"));
-  assert (parse ("test/:\n{\n}\n"));
-  assert (parse ("test/:\n{\nfoo:bar\n}"));
-  assert (parse ("test/:\n{\nfoo:bar\n}"));
-  assert (parse ("test/:\n{\nmore/:\n{\n}\n}"));
-  assert (parse ("test/:\n{\nmore/:\n{\nfoo:{bar baz}\n}\n}"));
-
-  assert (!parse ("test/:\n{"));
-  assert (!parse ("test/:\n{\n"));
-  assert (!parse ("test/:\n{\n:"));
-  assert (!parse ("test/:\n{\n} foo: bar\n"));
-  assert (!parse ("test/ foo:\n{\n}"));
-  assert (!parse ("test foo/:\n{\n}"));
-  assert (!parse ("test/ foo/:\n{\n}"));
-}
-
-struct test_parser: parser
-{
-  names_type
-  test_names (const char*, lexer_mode, bool chunk);
-};
-
-static bool
-parse (const char* s)
-{
-  reset (); // Clear the state.
-
-  // Create a minimal root scope.
-  //
-  auto i (scopes.insert (path::current (), nullptr, true, true));
-  scope& root (*i->second);
-  root.src_path_ = root.out_path_ = &i->first;
-
-  istringstream is (s);
-
-  is.exceptions (istream::failbit | istream::badbit);
-  parser p;
-
-  try
-  {
-    p.parse_buildfile (is, path (), root, root);
-  }
-  catch (const failed&)
-  {
-    return false;
-  }
-
-  return true;
-}
-
-// parser::names()
-//
-names test_parser::
-test_names (const char* s, lexer_mode m, bool chunk)
-{
-  istringstream is (s);
-  is.exceptions (istream::failbit | istream::badbit);
-  lexer l (is, "");
-
-  if (m != lexer_mode::normal)
-    l.mode (m, '=');
-
-  path_ = &l.name ();
-  lexer_ = &l;
-  target_ = nullptr;
-  scope_ = root_ = global_scope;
-
-  token t (token_type::eos, false, 0, 0);
-  token_type tt;
-  next (t, tt);
-  return names (t, tt, chunk);
-}
-
-static names
-parse_names (const char* s, lexer_mode m, bool chunk)
-{
-  test_parser p;
-  return p.test_names (s, m, chunk);
-}