diff options
author | Keith Rothman <537074+litghost@users.noreply.github.com> | 2021-02-11 15:31:19 -0800 |
---|---|---|
committer | Keith Rothman <537074+litghost@users.noreply.github.com> | 2021-02-11 15:31:19 -0800 |
commit | f9c773f18546cbaa963aeaa3f143cb8067b6e2f9 (patch) | |
tree | 0f9917ff76215c44dc2f1af5ca749f0e73d24f60 /fpga_interchange/xdc.cc | |
parent | 8f93e7e0f897b1b5da469919c9a43ba28b623b2a (diff) | |
download | nextpnr-tests-f9c773f18546cbaa963aeaa3f143cb8067b6e2f9.tar.gz nextpnr-tests-f9c773f18546cbaa963aeaa3f143cb8067b6e2f9.tar.bz2 nextpnr-tests-f9c773f18546cbaa963aeaa3f143cb8067b6e2f9.zip |
Add simple unit test for FPGA interchange XDC parser.
Signed-off-by: Keith Rothman <537074+litghost@users.noreply.github.com>
Diffstat (limited to 'fpga_interchange/xdc.cc')
-rw-r--r-- | fpga_interchange/xdc.cc | 60 |
1 files changed, 60 insertions, 0 deletions
diff --git a/fpga_interchange/xdc.cc b/fpga_interchange/xdc.cc new file mode 100644 index 0000000..333af37 --- /dev/null +++ b/fpga_interchange/xdc.cc @@ -0,0 +1,60 @@ +/* + * nextpnr -- Next Generation Place and Route + * + * Copyright (C) 2021 Symbiflow Authors + * + * Permission to use, copy, modify, and/or distribute this software for any + * purpose with or without fee is hereby granted, provided that the above + * copyright notice and this permission notice appear in all copies. + * + * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES + * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF + * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR + * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES + * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN + * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF + * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. + * + */ + +#include "gtest/gtest.h" + +#include "nextpnr.h" +#include "xdc.h" + +USING_NEXTPNR_NAMESPACE + +class XdcTest : public ::testing::Test {}; + +TEST_F(XdcTest, do_nothing_interp) +{ + { + TclInterp interp(nullptr); + } + { + TclInterp interp(nullptr); + } +} + +TEST_F(XdcTest, unknown_function) +{ + TclInterp interp(nullptr); + + NPNR_ASSERT(Tcl_Eval(interp.interp, "set value port") == TCL_OK); + ASSERT_STREQ(Tcl_GetVar(interp.interp, "value", 0), "port"); + + NPNR_ASSERT(Tcl_Eval(interp.interp, "set value port[0]") == TCL_OK); + ASSERT_STREQ(Tcl_GetVar(interp.interp, "value", 0), "port[0]"); + + NPNR_ASSERT(Tcl_Eval(interp.interp, "set value port[1]") == TCL_OK); + ASSERT_STREQ(Tcl_GetVar(interp.interp, "value", 0), "port[1]"); + + NPNR_ASSERT(Tcl_Eval(interp.interp, "set value port[10]") == TCL_OK); + ASSERT_STREQ(Tcl_GetVar(interp.interp, "value", 0), "port[10]"); + + NPNR_ASSERT(Tcl_Eval(interp.interp, "set value port[123]") == TCL_OK); + ASSERT_STREQ(Tcl_GetVar(interp.interp, "value", 0), "port[123]"); + + NPNR_ASSERT(Tcl_Eval(interp.interp, "set value port[x]") == TCL_ERROR); + NPNR_ASSERT(Tcl_Eval(interp.interp, "set value port[0 x]") == TCL_ERROR); +} |