|
FUNCTION type_of_set (items : SET [0:?] OF GENERIC) : SET [0:?] OF STRING; LOCAL result : SET OF STRING := [ ] ; END_LOCAL ; REPEAT i := 1 TO HIINDEX ( items ) ; result := result + TYPEOF ( items [ i ] ) ; END_REPEAT ; RETURN ( result ) ; END_FUNCTION; -- type_of_set |
|
public class FType_of_set public static Value run(SdaiContext _context, Value items) |