Warning, /frameworks/syntax-highlighting/autotests/folding/test-iso.mod.fold is written in an unsupported language. File is not indexed.
0001 <beginfold id='1'>(*</beginfold id='1'> ISO Modula-2 Syntax highlighting test <endfold id='1'>*)</endfold id='1'> 0002 0003 <beginfold id='1'>(*</beginfold id='1'> dialect tags <endfold id='1'>*)</endfold id='1'> 0004 0005 (*!m2iso*) 0006 0007 0008 <beginfold id='1'>(*</beginfold id='1'> pragmas <endfold id='1'>*)</endfold id='1'> 0009 0010 <*foo*> 0011 0012 0013 <beginfold id='1'>(*</beginfold id='1'> foldable comments <endfold id='1'>*)</endfold id='1'> 0014 0015 <beginfold id='1'>(*</beginfold id='1'> foo bar baz 0016 <beginfold id='1'>(*</beginfold id='1'> nested comment <endfold id='1'>*)</endfold id='1'> 0017 bam boo bee bop <endfold id='1'>*)</endfold id='1'> 0018 0019 0020 <beginfold id='1'>(*</beginfold id='1'> built-in constants <endfold id='1'>*)</endfold id='1'> 0021 0022 FALSE INTERRUPTIBLE NIL TRUE UNINTERRUPTIBLE 0023 0024 0025 <beginfold id='1'>(*</beginfold id='1'> built-in types <endfold id='1'>*)</endfold id='1'> 0026 0027 BOOLEAN BITSET CARDINAL COMPLEX CHAR INTEGER LONGCOMPLEX LONGREAL 0028 PROC PROTECTION REAL 0029 0030 0031 <beginfold id='1'>(*</beginfold id='1'> built-in procedures <endfold id='1'>*)</endfold id='1'> 0032 0033 ABS ALLOCATE CAP CHR CMPLX DEALLOCATE DEC DISPOSE EXCL FLOAT HALT HIGH 0034 INC INCL INT LENGTH LFLOAT MAX MIN NEW ODD ORD RE SIZE TRUNC VAL 0035 0036 0037 <beginfold id='1'>(*</beginfold id='1'> reserved words <endfold id='1'>*)</endfold id='1'> 0038 0039 AND ARRAY BEGIN BY CASE CONST DEFINITION DIV DO ELSE ELSIF END EXIT EXPORT 0040 FINALLY FOR FORWARD FROM IF IMPLEMENTATION IMPORT IN LOOP MOD MODULE NOT OF OR 0041 PACKEDSET POINTER PROCEDURE QUALIFIED RECORD REM REPEAT RETRY RETURN SET THEN 0042 TO TYPE UNTIL VAR WHILE WITH 0043 0044 0045 <beginfold id='1'>(*</beginfold id='1'> unsafe facilities <endfold id='1'>*)</endfold id='1'> 0046 0047 <beginfold id='1'>(*</beginfold id='1'> module <endfold id='1'>*)</endfold id='1'> 0048 0049 SYSTEM 0050 0051 <beginfold id='1'>(*</beginfold id='1'> constants <endfold id='1'>*)</endfold id='1'> 0052 0053 BITSPERLOC BITSPERWORD 0054 0055 <beginfold id='1'>(*</beginfold id='1'> types <endfold id='1'>*)</endfold id='1'> 0056 0057 ADDRESS LOC WORD 0058 0059 <beginfold id='1'>(*</beginfold id='1'> procedures <endfold id='1'>*)</endfold id='1'> 0060 0061 ADDADR ADR CAST DIFADR MAKEADR ROTATE SHIFT SUBADR TSIZE 0062 0063 0064 <beginfold id='1'>(*</beginfold id='1'> number literals <endfold id='1'>*)</endfold id='1'> 0065 0066 CONST 0067 n = 1000; r = 1.234; x = 0FFFFH; c = 077C; 0068 0069 0070 <beginfold id='1'>(*</beginfold id='1'> quoted literals <endfold id='1'>*)</endfold id='1'> 0071 0072 CONST 0073 apostrophe = "'"; doublequote = '"'; 0074 single ='foobar'; double = "bazbam"; 0075 0076 0077 <beginfold id='1'>(*</beginfold id='1'> sample code <endfold id='1'>*)</endfold id='1'> 0078 0079 TYPE Foo = RECORD 0080 bar : Baz; 0081 bam : Boo 0082 END; <beginfold id='1'>(*</beginfold id='1'> Foobar <endfold id='1'>*)</endfold id='1'> 0083 0084 0085 VAR 0086 foo, bar, baz : CARDINAL; 0087 0088 0089 IF foo > bar THEN 0090 baz := bam 0091 ELSE 0092 baz := boo 0093 END; 0094 0095 0096 <beginfold id='1'>(*</beginfold id='1'> EOF <endfold id='1'>*)</endfold id='1'>