@@ -10,7 +10,7 @@ endif
 
 setl iskeyword+=?,$,+,*,/,%,=,>,<,&,-,',.,:,@,~,^,!
 
-syntax keyword          minimDefaultSymbol ! != $ & ' * + - % ^ -> . .. / : < <= == => =~ > >= @ ROOT aes and append apply ask at atime b bind bool bool? bury1 bury2 bury3 c call call! capitalize case cd chmod choose clear-stack column-print concat confirm cons cp cpu crypto ctime datetime ddel debug debug? decode decrypt define delete dget dictionary? dig1 dig2 dig3 dip dir? dirname div dprint dprint! dset dump-stack dup dupd echo encode encrypt env? eq eval even? exit fappend file? filename filter first float float? foreach fperms fread from-json fs fsize fstats ftype fwrite gets get-stack getenv gt gte hardlink hidden? i id ifte import indent inspect int int? interpolate interval io join k keys length linrec load load-symbol logic lowercase ls ls-r lt lte map match md5 mkdir mod module mtime mv newline not noteq now num number? odd? or os password pop popd pred prepend print print! prompt puts puts! putenv q quit quotation? quote raise regex remove-symbol repeat replace rest rm rmdir run save-symbol scope scope? seal search select set-stack sha1 sha224 sha256 sha384 sha512 sigil sigils sip size sleep source split stored-symbols str string string? strip succ swap swapd swons symbols symlink symlink? sys system take tformat time timeinfo times timestamp titleize to-json try unit unquote uppercase values version which while with xor zap contains
+syntax keyword          minimDefaultSymbol ! != $ & ' * + - % ^ -> . .. / : < <= == => =~ > >= @ ROOT aes and append apply ask at atime b bind bool bool? bury1 bury2 bury3 c call call! capitalize case cd chmod choose clear-stack column-print concat confirm cons cp cpu crypto ctime datetime ddel debug debug? decode decrypt define delete dget dictionary? dig1 dig2 dig3 dip dir? dirname div dprint dprint! dset dump-stack dup dupd echo encode encrypt env? eq eval even? exit fappend file? filename filter first float float? foreach fperms fread from-json fs fsize fstats ftype fwrite gets get-stack getenv gt gte hardlink hidden? i id ifte import include indent inspect int int? interpolate interval io join k keys length linrec load load-symbol logic lowercase ls ls-r lt lte map match md5 mkdir mod module mtime mv newline not noteq now num number? odd? or os password pop popd pred prepend print print! prompt puts puts! putenv q quit quotation? quote raise regex remove-symbol repeat replace rest rm rmdir run save-symbol scope scope? seal search select set-stack sha1 sha224 sha256 sha384 sha512 sigil sigils sip size sleep source split stored-symbols str string string? strip succ swap swapd swons symbols symlink symlink? sys system take tformat time timeinfo times timestamp titleize to-json try unit unquote uppercase values version which while with xor zap contains
 
 
 syntax match            minimDefaultSigil     ;\<[:@'~!$%&$=<>^*]; contained

@@ -68,6 +68,7 @@ (call pop)                                                    :call!
 (:ms :q :check (check) (ms sleep q) while)                    :interval
 (password aes encode)                                         :encrypt
 (decode password aes)                                         :decrypt
+(dup load import)                                             :include
 
 ; Prompt
 ("[$1]$$ " (.) %)                 :prompt

@@ -1,5 +1,4 @@ 
-'test load
-'test import
+'test include
 
 "crypto" describe
 

@@ -1,5 +1,4 @@ 
-'test load
-'test import
+'test include
 
 "fs" describe
 
@@ -7,7 +6,7 @@ "TEST" "test.txt" fwrite
   
   ("test.txt" fsize 4 ==) assert
 
-  ("test.txt" fperms 644 ==) assert
+  ("test.txt" fperms 644 >=) assert
 
   ("test.txt" ftype "file" ==) assert
 

@@ -1,5 +1,4 @@ 
-'test load
-'test import
+'test include
 
 "io" describe
 

@@ -1,5 +1,4 @@ 
-'test load
-'test import
+'test include
 
 "lang" describe
 

@@ -1,5 +1,4 @@ 
-'test load
-'test import
+'test include
 
 "logic" describe
 

@@ -1,5 +1,4 @@ 
-'test load
-'test import
+'test include
 
 "num" describe
 

@@ -1,5 +1,4 @@ 
-'test load
-'test import
+'test include
 
 "str" describe
   

@@ -1,5 +1,4 @@ 
-'test load
-'test import
+'test include
 
 "sys" describe
 

@@ -1,5 +1,4 @@ 
-'test load
-'test import
+'test include
 
 "time" describe