artemist/mes
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

optargs guile

Browse source
This commit is contained in:
Jan Nieuwenhuizen 2016-12-25 11:13:51 +01:00
parent 8531e9d898
commit a36896662e
1 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
tests/optargs.test
View file

@ -25,8 +25,13 @@ exit $?
;;; You should have received a copy of the GNU General Public License ;;; You should have received a copy of the GNU General Public License
;;; along with Mes. If not, see <http://www.gnu.org/licenses/>. ;;; along with Mes. If not, see <http://www.gnu.org/licenses/>.
(mes-use-module (mes optargs)) (cond-expand
(mes-use-module (mes test)) (guile-2)
(guile
(use-modules (ice-9 optargs)))
(mes
(mes-use-module (mes optargs))
(mes-use-module (mes test))))
(pass-if-equal "cond =>" 10 (pass-if-equal "cond =>" 10
(cond (cond