diff options
Diffstat (limited to 'tests/userprog/args-dbl-space.ck')
| -rw-r--r-- | tests/userprog/args-dbl-space.ck | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/tests/userprog/args-dbl-space.ck b/tests/userprog/args-dbl-space.ck new file mode 100644 index 0000000..dfbcf4b --- /dev/null +++ b/tests/userprog/args-dbl-space.ck | |||
| @@ -0,0 +1,15 @@ | |||
| 1 | # -*- perl -*- | ||
| 2 | use strict; | ||
| 3 | use warnings; | ||
| 4 | use tests::tests; | ||
| 5 | check_expected ([<<'EOF']); | ||
| 6 | (args) begin | ||
| 7 | (args) argc = 3 | ||
| 8 | (args) argv[0] = 'args-dbl-space' | ||
| 9 | (args) argv[1] = 'two' | ||
| 10 | (args) argv[2] = 'spaces!' | ||
| 11 | (args) argv[3] = null | ||
| 12 | (args) end | ||
| 13 | args-dbl-space: exit(0) | ||
| 14 | EOF | ||
| 15 | pass; | ||
