Possibility to access first extended attributes.

This commit is contained in:
Pavel Machek 1999-11-04 13:33:30 +00:00
parent 2727bb7c5b
commit 91447965fe
2 changed files with 15 additions and 1 deletions

View file

@ -11,6 +11,8 @@
FIXME: create community lists FIXME: create community lists
FIXME: access to dynamic attributes FIXME: access to dynamic attributes
FIXME: local namespace for functions FIXME: local namespace for functions
FIXME: enumerational types
FIXME: defined() keyword
*/ */
CF_HDR CF_HDR

View file

@ -305,7 +305,19 @@ interpret(struct f_inst *what)
} }
break; break;
case 'ea': /* Access to extended attributes [hmm, but we need it read/write, do we?] */ case 'ea': /* Access to extended attributes [hmm, but we need it read/write, do we?] */
bug( "Implement me" ); {
eattr *e = ea_find( (*f_rte)->attrs->eattrs, what->a2.i );
if (!e) {
res.type = T_VOID;
break;
}
res.type = what->a1.i;
switch (what->a1.i) {
case T_INT:
res.val.i = e->u.data;
break;
}
}
break; break;
case 'cp': /* Convert prefix to ... */ case 'cp': /* Convert prefix to ... */
ONEARG; ONEARG;