aboutsummaryrefslogtreecommitdiff
path: root/tests/expansion/type.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/expansion/type.test')
-rw-r--r--tests/expansion/type.test50
1 files changed, 0 insertions, 50 deletions
diff --git a/tests/expansion/type.test b/tests/expansion/type.test
deleted file mode 100644
index 8899aa3..0000000
--- a/tests/expansion/type.test
+++ /dev/null
@@ -1,50 +0,0 @@
-# file : tests/expansion/type.test
-# copyright : Copyright (c) 2014-2018 Code Synthesis Ltd
-# license : MIT; see accompanying LICENSE file
-
-# Test type propagation during expansion.
-
-.include ../common.test
-
-: var
-:
-$* <<EOI
-x = [bool] true
-y = $x
-assert ($type($y) == bool)
-EOI
-
-: eval
-:
-$* <<EOI
-y = ([bool] true)
-assert ($type($y) == bool)
-EOI
-
-: func
-:
-$* <<EOI
-y = $identity([bool] true)
-assert ($type($y) == bool)
-EOI
-
-: untypify
-:
-$* <<EOI
-x = [bool] true
-y = "$x"
-assert ($type($y) == "")
-EOI
-
-: retypify
-:
-$* <'print [bool] ([string] true)' >'true'
-
-: retypify-quote
-:
-$* <'print [bool] "([string] true)"' >'true'
-
-: retypify-name
-: Test the "steal" case of untypify()
-:
-$* <'print [bool] "([name] true)"' >'true'