989a4241ac12654b68845dbe3f61a0c49b95f0dc
[platform/upstream/m4.git] / checks / 074.shift
1 dnl @ ../doc/m4.texinfo:3004: Origin of test
2 dnl @ expected status: 0
3 dnl @ extra options: 
4 dnl @ Copyright (C) 2006, 2007, 2008, 2009 Free Software
5 dnl @ Foundation, Inc.
6 dnl @ This file is free software; the Free Software Foundation
7 dnl @ gives unlimited permission to copy and/or distribute it
8 dnl @ with or without modifications, as long as this notice
9 dnl @ is preserved.
10 include(`join.m4')
11 dnl @result{}
12 join,join(`-'),join(`-', `'),join(`-', `', `')
13 dnl @result{},,,
14 joinall,joinall(`-'),joinall(`-', `'),joinall(`-', `', `')
15 dnl @result{},,,-
16 join(`-', `1')
17 dnl @result{}1
18 join(`-', `1', `2', `3')
19 dnl @result{}1-2-3
20 join(`', `1', `2', `3')
21 dnl @result{}123
22 join(`-', `', `1', `', `', `2', `')
23 dnl @result{}1-2
24 joinall(`-', `', `1', `', `', `2', `')
25 dnl @result{}-1---2-
26 join(`,', `1', `2', `3')
27 dnl @result{}1,2,3
28 define(`nargs', `$#')dnl
29 nargs(join(`,', `1', `2', `3'))
30 dnl @result{}1