fly/fgdata
1
0
Fork 0
Code Activity

io.nas: add deprecation warning to io.is{dir,fifo,lnk,...}

Browse source
This commit is contained in:
mfranz 2009-02-15 18:26:20 +00:00
parent b95ea91501
commit fed30b2f05
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
Nasal/io.nas
View file

@ -13,8 +13,9 @@ var readfile = func(file) {
# (stat(...)[2]) from a stat() call (index 2), extracts the IFMT # (stat(...)[2]) from a stat() call (index 2), extracts the IFMT
# subfield and compares it with the given type, assumes S_IFMT == # subfield and compares it with the given type, assumes S_IFMT ==
# 0xf000. # 0xf000.
var _gen_ifmt_test = func(ifmt) { var _gen_ifmt_test = func(fmt, ifmt) {
func(stat_mode) { func(stat_mode) {
debug.warn("use of deprecated function is" ~ fmt ~ "()");
var i = int(stat_mode / 0x1000); var i = int(stat_mode / 0x1000);
return ifmt == i - int(i / 0x10) * 0x10; return ifmt == i - int(i / 0x10) * 0x10;
} }
@ -26,7 +27,7 @@ var _gen_ifmt_test = func(ifmt) {
# if (s != nil and io.isdir(s[2])) { ... } # if (s != nil and io.isdir(s[2])) { ... }
var ifmts = { dir:4, reg:8, lnk:10, sock:12, fifo:1, blk:6, chr:2 }; var ifmts = { dir:4, reg:8, lnk:10, sock:12, fifo:1, blk:6, chr:2 };
foreach (var fmt; keys(ifmts)) foreach (var fmt; keys(ifmts))
caller(0)[0]["is" ~ fmt] = _gen_ifmt_test(ifmts[fmt]); caller(0)[0]["is" ~ fmt] = _gen_ifmt_test(fmt, ifmts[fmt]);
# Loads Nasal file into namespace and executes it. The namespace # Loads Nasal file into namespace and executes it. The namespace