Skip to content

Commit fe67584

Browse files
Add tests for ARGV.
1 parent bf13748 commit fe67584

5 files changed

Lines changed: 13 additions & 0 deletions

File tree

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+
ARGV("extra")
Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,5 @@
1+
TNS: args = ARGV()
2+
3+
FOR(i, TLEN(args, 0d1)){
4+
ASSERT(ISSTR(args[i]))
5+
}
Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,4 @@
1+
! ARGV_LAST_ARG_SELF_FILE_MARKER
2+
STR: source = REPLACE(READFILE(ARGV()[-0d1]), "\r", "")
3+
4+
ASSERT(IN("! ARGV_LAST_ARG_SELF_FILE_MARKER", SPLIT(source, "\n")))
Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,2 @@
1+
ASSERT(EQ(TYPE(SHAPE(ARGV())), "TNS"))
2+
ASSERT(EQ(TLEN(SHAPE(ARGV()), 0d1), 0d1))
Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+
ASSERT(EQ(TYPE(ARGV()), "TNS"))

0 commit comments

Comments
 (0)