|
FUNCTION check_text_alignment (ct : composite_text) : BOOLEAN; LOCAL a : SET OF text_alignment := [ ] ; END_LOCAL ; REPEAT i := 1 TO HIINDEX ( ct . collected_text ) ; a := a + [ ct . collected_text [ i ] \ text_literal . alignment ] ; END_REPEAT ; RETURN ( SIZEOF ( a ) = 1 ) ; END_FUNCTION; -- check_text_alignment |
|
public class FCheck_text_alignment public static Value run(SdaiContext _context, Value ct) |