Warning, /frameworks/syntax-highlighting/autotests/folding/test-pim.mod.fold is written in an unsupported language. File is not indexed.
0001 <beginfold id='1'>(*</beginfold id='1'> PIM 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 (*!m2pim*) 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'> reserved words <endfold id='1'>*)</endfold id='1'> 0021 0022 AND ARRAY BEGIN BY CASE CONST DEFINITION DIV DO ELSE ELSIF END EXIT EXPORT FOR 0023 FROM IF IMPLEMENTATION IMPORT IN LOOP MOD MODULE NOT OF OR POINTER PROCEDURE 0024 QUALIFIED RECORD REPEAT RETURN SET THEN TO TYPE UNTIL VAR WHILE WITH 0025 0026 0027 <beginfold id='1'>(*</beginfold id='1'> built-in constants <endfold id='1'>*)</endfold id='1'> 0028 0029 FALSE NIL TRUE 0030 0031 0032 <beginfold id='1'>(*</beginfold id='1'> built-in types <endfold id='1'>*)</endfold id='1'> 0033 0034 BOOLEAN BITSET CARDINAL CHAR INTEGER LONGINT LONGREAL PROC REAL 0035 0036 0037 <beginfold id='1'>(*</beginfold id='1'> built-in procedures <endfold id='1'>*)</endfold id='1'> 0038 0039 ABS ALLOCATE CAP CHR DEALLOCATE DEC DISPOSE EXCL FLOAT HALT HIGH 0040 INC INCL MAX MIN NEW ODD ORD SIZE TRUNC VAL 0041 0042 0043 <beginfold id='1'>(*</beginfold id='1'> unsafe facilities <endfold id='1'>*)</endfold id='1'> 0044 0045 <beginfold id='1'>(*</beginfold id='1'> module <endfold id='1'>*)</endfold id='1'> 0046 0047 SYSTEM 0048 0049 <beginfold id='1'>(*</beginfold id='1'> types <endfold id='1'>*)</endfold id='1'> 0050 0051 ADDRESS WORD PROCESS 0052 0053 <beginfold id='1'>(*</beginfold id='1'> procedures <endfold id='1'>*)</endfold id='1'> 0054 0055 ADR NEWPROCESS TRANSFER TSIZE 0056 0057 0058 <beginfold id='1'>(*</beginfold id='1'> number literals <endfold id='1'>*)</endfold id='1'> 0059 0060 CONST 0061 n = 1000; r = 1.234; x = 0FFFFH; c = 077C; 0062 0063 0064 <beginfold id='1'>(*</beginfold id='1'> quoted literals <endfold id='1'>*)</endfold id='1'> 0065 0066 CONST 0067 apostrophe = "'"; doublequote = '"'; 0068 single ='foobar'; double = "bazbam"; 0069 0070 0071 <beginfold id='1'>(*</beginfold id='1'> sample code <endfold id='1'>*)</endfold id='1'> 0072 0073 TYPE Foo = RECORD 0074 bar : Baz; 0075 bam : Boo 0076 END; <beginfold id='1'>(*</beginfold id='1'> Foobar <endfold id='1'>*)</endfold id='1'> 0077 0078 0079 VAR 0080 foo, bar, baz : CARDINAL; 0081 0082 0083 IF foo > bar THEN 0084 baz := bam 0085 ELSE 0086 baz := boo 0087 END; 0088 0089 0090 <beginfold id='1'>(*</beginfold id='1'> EOF <endfold id='1'>*)</endfold id='1'>