# This file is part of Eclat -*- Autotest -*- # Copyright (C) 2012-2023 Sergey Poznyakoff # # Eclat is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 3, or (at your option) # any later version. # # Eclat is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with Eclat. If not, see . AT_SETUP([Node equal]) AT_KEYWORDS([forlan compare comp comp00]) AT_DATA([input],[ if (.root.x == .root.y) print("PASS\n"); else print("FAIL\n"); ]) AT_CHECK([tforlan -s input - < X X EOT tforlan -s input - < X Y EOT tforlan -s input - < X EOT tforlan -s input - < EOT], [0], [PASS FAIL FAIL PASS ]) AT_CLEANUP