X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/3678daaf90c4314d1475d057909ae3f44abc8934..29bf58762caeba4a93521571fad90fab4cb7bd3b:/fth/t_corex.fth

diff --git a/fth/t_corex.fth b/fth/t_corex.fth
index 405b5c1..3784cee 100644
--- a/fth/t_corex.fth
+++ b/fth/t_corex.fth
@@ -315,5 +315,11 @@ DECIMAL
 \ Check number prefixes in compile mode
 T{ : nmp  #8327 $-2cbe %011010111 ''' ; nmp }T{ 8327 -11454 215 39 }T
 
+\  ----------------------------------------------------- ENVIRONMENT?
+
+T{ s" unknown-query-string" ENVIRONMENT? }T{ FALSE }T
+T{ s" MAX-CHAR" ENVIRONMENT? }T{ 255 TRUE }T
+T{ s" ADDRESS-UNITS-BITS" ENVIRONMENT? }T{ 8 TRUE }T
+
 }TEST