Warning, /frameworks/syntax-highlighting/autotests/folding/test-r10.mod.fold is written in an unsupported language. File is not indexed.
0001 <beginfold id='1'>(*</beginfold id='1'> Modula-2 R10 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 (*!m2r10*) 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'> line comments <endfold id='1'>*)</endfold id='1'> 0014 0015 ! foo bar baz bam boo 0016 0017 0018 <beginfold id='1'>(*</beginfold id='1'> foldable comments <endfold id='1'>*)</endfold id='1'> 0019 0020 <beginfold id='1'>(*</beginfold id='1'> foo bar baz 0021 <beginfold id='1'>(*</beginfold id='1'> nested comment <endfold id='1'>*)</endfold id='1'> 0022 bam boo bee bop <endfold id='1'>*)</endfold id='1'> 0023 0024 0025 <beginfold id='1'>(*</beginfold id='1'> reserved words <endfold id='1'>*)</endfold id='1'> 0026 0027 ALIAS AND ARGLIST ARRAY BEGIN BLUEPRINT BY CASE CONST COPY DEFINITION DIV DO 0028 ELSE ELSIF END EXIT FOR FROM GENLIB IF IMPLEMENTATION IMPORT IN LOOP MOD 0029 MODULE NEW NOT OF OPAQUE OR POINTER PROCEDURE READ RECORD REFERENTIAL RELEASE 0030 REPEAT RETAIN RETURN SET THEN TO TYPE UNTIL VAR WHILE WRITE YIELD 0031 0032 0033 <beginfold id='1'>(*</beginfold id='1'> built-in constants <endfold id='1'>*)</endfold id='1'> 0034 0035 FALSE NIL TRUE 0036 0037 0038 <beginfold id='1'>(*</beginfold id='1'> built-in types <endfold id='1'>*)</endfold id='1'> 0039 0040 BOOLEAN CARDINAL CHAR INTEGER LONGCARD LONGINT LONGREAL OCTET REAL 0041 0042 0043 <beginfold id='1'>(*</beginfold id='1'> built-in procedures <endfold id='1'>*)</endfold id='1'> 0044 0045 ABS APPEND CAPACITY CHR COUNT ENTIER INSERT LENGTH LOG2 MAX MIN ODD ORD 0046 POW2 PRED PTR REMOVE SGN SUCC 0047 0048 0049 <beginfold id='1'>(*</beginfold id='1'> UNSAFE facilities <endfold id='1'>*)</endfold id='1'> 0050 0051 <beginfold id='1'>(*</beginfold id='1'> module identifier <endfold id='1'>*)</endfold id='1'> 0052 0053 UNSAFE 0054 0055 <beginfold id='1'>(*</beginfold id='1'> reserved words <endfold id='1'>*)</endfold id='1'> 0056 0057 CAST 0058 0059 <beginfold id='1'>(*</beginfold id='1'> constants <endfold id='1'>*)</endfold id='1'> 0060 0061 BitsPerAddress BitsPerByte BytesPerWord BytesPerLongWord 0062 0063 <beginfold id='1'>(*</beginfold id='1'> types <endfold id='1'>*)</endfold id='1'> 0064 0065 ADDRESS BYTE WORD LONGWORD OCTETSEQ 0066 0067 <beginfold id='1'>(*</beginfold id='1'> procedures <endfold id='1'>*)</endfold id='1'> 0068 0069 ADD ADR BIT BWAND BWNOT BWOR HALT SETBIT SHL SHR SUB 0070 0071 0072 <beginfold id='1'>(*</beginfold id='1'> number literals <endfold id='1'>*)</endfold id='1'> 0073 0074 CONST 0075 b = 0b0110'1001; <beginfold id='1'>(*</beginfold id='1'> base-2 <endfold id='1'>*)</endfold id='1'> 0076 0077 n = 1000'0000; <beginfold id='1'>(*</beginfold id='1'> base-10 <endfold id='1'>*)</endfold id='1'> 0078 0079 x = 0xDEAD'BEEF; <beginfold id='1'>(*</beginfold id='1'> base-16 <endfold id='1'>*)</endfold id='1'> 0080 0081 c = 0u2A; <beginfold id='1'>(*</beginfold id='1'> character code <endfold id='1'>*)</endfold id='1'> 0082 0083 r = 1.234; <beginfold id='1'>(*</beginfold id='1'> real number <endfold id='1'>*)</endfold id='1'> 0084 0085 0086 <beginfold id='1'>(*</beginfold id='1'> quoted literals <endfold id='1'>*)</endfold id='1'> 0087 0088 CONST 0089 apostrophe = "'"; doublequote = '"'; 0090 single ='foobar'; double = "bazbam"; 0091 0092 0093 <beginfold id='1'>(*</beginfold id='1'> sample code <endfold id='1'>*)</endfold id='1'> 0094 0095 TYPE Foo = RECORD 0096 bar : Baz; 0097 bam : Boo 0098 END; <beginfold id='1'>(*</beginfold id='1'> Foobar <endfold id='1'>*)</endfold id='1'> 0099 0100 0101 VAR 0102 foo, bar, baz : CARDINAL; 0103 0104 0105 IF foo > bar THEN 0106 baz := bam 0107 ELSE 0108 baz := boo 0109 END; 0110 0111 0112 <beginfold id='1'>(*</beginfold id='1'> EOF <endfold id='1'>*)</endfold id='1'>