feat: add missing KF6 framework recipes
This commit is contained in:
@@ -0,0 +1,96 @@
|
||||
(* ISO Modula-2 Syntax highlighting test *)
|
||||
|
||||
(* dialect tags *)
|
||||
|
||||
(*!m2iso*)
|
||||
|
||||
|
||||
(* pragmas *)
|
||||
|
||||
<*foo*>
|
||||
|
||||
|
||||
(* foldable comments *)
|
||||
|
||||
(* foo bar baz
|
||||
(* nested comment *)
|
||||
bam boo bee bop *)
|
||||
|
||||
|
||||
(* built-in constants *)
|
||||
|
||||
FALSE INTERRUPTIBLE NIL TRUE UNINTERRUPTIBLE
|
||||
|
||||
|
||||
(* built-in types *)
|
||||
|
||||
BOOLEAN BITSET CARDINAL COMPLEX CHAR INTEGER LONGCOMPLEX LONGREAL
|
||||
PROC PROTECTION REAL
|
||||
|
||||
|
||||
(* built-in procedures *)
|
||||
|
||||
ABS ALLOCATE CAP CHR CMPLX DEALLOCATE DEC DISPOSE EXCL FLOAT HALT HIGH
|
||||
INC INCL INT LENGTH LFLOAT MAX MIN NEW ODD ORD RE SIZE TRUNC VAL
|
||||
|
||||
|
||||
(* reserved words *)
|
||||
|
||||
AND ARRAY BEGIN BY CASE CONST DEFINITION DIV DO ELSE ELSIF END EXIT EXPORT
|
||||
FINALLY FOR FORWARD FROM IF IMPLEMENTATION IMPORT IN LOOP MOD MODULE NOT OF OR
|
||||
PACKEDSET POINTER PROCEDURE QUALIFIED RECORD REM REPEAT RETRY RETURN SET THEN
|
||||
TO TYPE UNTIL VAR WHILE WITH
|
||||
|
||||
|
||||
(* unsafe facilities *)
|
||||
|
||||
(* module *)
|
||||
|
||||
SYSTEM
|
||||
|
||||
(* constants *)
|
||||
|
||||
BITSPERLOC BITSPERWORD
|
||||
|
||||
(* types *)
|
||||
|
||||
ADDRESS LOC WORD
|
||||
|
||||
(* procedures *)
|
||||
|
||||
ADDADR ADR CAST DIFADR MAKEADR ROTATE SHIFT SUBADR TSIZE
|
||||
|
||||
|
||||
(* number literals *)
|
||||
|
||||
CONST
|
||||
n = 1000; r = 1.234; x = 0FFFFH; c = 077C;
|
||||
|
||||
|
||||
(* quoted literals *)
|
||||
|
||||
CONST
|
||||
apostrophe = "'"; doublequote = '"';
|
||||
single ='foobar'; double = "bazbam";
|
||||
|
||||
|
||||
(* sample code *)
|
||||
|
||||
TYPE Foo = RECORD
|
||||
bar : Baz;
|
||||
bam : Boo
|
||||
END; (* Foobar *)
|
||||
|
||||
|
||||
VAR
|
||||
foo, bar, baz : CARDINAL;
|
||||
|
||||
|
||||
IF foo > bar THEN
|
||||
baz := bam
|
||||
ELSE
|
||||
baz := boo
|
||||
END;
|
||||
|
||||
|
||||
(* EOF *)
|
||||
Reference in New Issue
Block a user