This repository has been archived on 2024-06-20. You can view files and clone it, but you cannot make any changes to it's state, such as pushing and creating new issues, pull requests or comments.
coffee.pygments/tests/examplefiles/red/example.reds.output
Oldes Huhuman 79db0b33cf
Don't require script headers in Rebol and Red codes. (#2349)
* Don't require script headers in Rebol and Red codes.
Resolves: https://github.com/pygments/pygments/issues/2348

* Not modifying the copyright

* Updated tests for Rebol and Red

* Rebol: removed the unneeded code instead of commenting.
2023-02-24 14:34:36 +01:00

858 lines
20 KiB
Text
Generated

'Red' Name.Variable
'/System' Name.Attribute
' ' Text
'[' Generic.Strong
'\n ' Text
'Title:' Generic.Subheading
' ' Text
'"' Literal.String
'Red/System example file' Literal.String
'"' Literal.String
'\n ' Text
'Purpose:' Generic.Subheading
' ' Text
'"' Literal.String
'Just some code for testing Pygments colorizer' Literal.String
'"' Literal.String
'\n ' Text
'Language:' Generic.Subheading
' ' Text
'http://www.red-lang.org/' Name.Decorator
'\n' Text
']' Generic.Strong
'\n\n' Text
'#include' Keyword.Namespace
' ' Text
'%../common/FPU-configuration.reds' Name.Decorator
'\n\n' Text
'; C types\n' Comment
'\n' Text
'#define' Keyword.Namespace
' ' Text
'time!' Keyword.Type
' ' Text
'long!' Keyword.Type
'\n' Text
'#define' Keyword.Namespace
' ' Text
'clock!' Keyword.Type
' ' Text
'long!' Keyword.Type
'\n\n' Text
'date!:' Generic.Subheading
' ' Text
'alias' Name.Exception
' ' Text
'struct!' Keyword.Type
' ' Text
'[' Generic.Strong
'\n ' Text
'second' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
' ' Text
'; 0-61 (60?)\n' Comment
' ' Text
'minute' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
' ' Text
'; 0-59\n' Comment
' ' Text
'hour' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
' ' Text
'; 0-23\n' Comment
'\n ' Text
'day' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
' ' Text
'; 1-31\n' Comment
' ' Text
'month' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
' ' Text
'; 0-11\n' Comment
' ' Text
'year' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
' ' Text
'; Since 1900\n' Comment
'\n ' Text
'weekday' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
' ' Text
'; 0-6 since Sunday\n' Comment
' ' Text
'yearday' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
' ' Text
'; 0-365\n' Comment
' ' Text
'daylight-saving-time?' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
' ' Text
'; Negative: unknown\n' Comment
']' Generic.Strong
'\n\n' Text
'#either' Keyword.Namespace
' ' Text
'OS' Name.Variable
' ' Text
'=' Operator
' ' Text
"'Windows" Name.Variable.Instance
' ' Text
'[' Generic.Strong
'\n ' Text
'#define' Keyword.Namespace
' ' Text
'clocks-per-second' Name.Variable
' ' Text
'1000' Literal.Number
'\n' Text
']' Generic.Strong
'[' Generic.Strong
'\n ' Text
'; CLOCKS_PER_SEC value for Syllable, Linux (XSI-conformant systems)\n' Comment
' ' Text
'; TODO: check for other systems\n' Comment
' ' Text
'#define' Keyword.Namespace
' ' Text
'clocks-per-second' Name.Variable
' ' Text
"1000'000" Literal.Number
'\n' Text
']' Generic.Strong
' \n\n' Text
'#import' Keyword.Namespace
' ' Text
'[' Generic.Strong
'LIBC-file' Name.Variable
' ' Text
'cdecl' Keyword.Namespace
' ' Text
'[' Generic.Strong
'\n\n ' Text
'; Error handling\n' Comment
'\n ' Text
'form-error:' Generic.Subheading
' ' Text
'"' Literal.String
'strerror' Literal.String
'"' Literal.String
' ' Text
'[' Generic.Strong
' ' Text
'; Return error description.\n' Comment
' ' Text
'code' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
'\n ' Text
'return:' Generic.Subheading
' ' Text
'[' Generic.Strong
'c-string!' Keyword.Type
']' Generic.Strong
'\n ' Text
']' Generic.Strong
'\n ' Text
'print-error:' Generic.Subheading
' ' Text
'"' Literal.String
'perror' Literal.String
'"' Literal.String
' ' Text
'[' Generic.Strong
' ' Text
'; Print error to standard error output.\n' Comment
' ' Text
'string' Name.Variable
' ' Text
'[' Generic.Strong
'c-string!' Keyword.Type
']' Generic.Strong
'\n ' Text
']' Generic.Strong
'\n\n\n ' Text
'; Memory management\n' Comment
'\n ' Text
'make:' Generic.Subheading
' ' Text
'"' Literal.String
'calloc' Literal.String
'"' Literal.String
' ' Text
'[' Generic.Strong
' ' Text
'; Allocate zero-filled memory.\n' Comment
' ' Text
'chunks' Name.Variable
' ' Text
'[' Generic.Strong
'size!' Keyword.Type
']' Generic.Strong
'\n ' Text
'size' Name.Variable
' ' Text
'[' Generic.Strong
'size!' Keyword.Type
']' Generic.Strong
'\n ' Text
'return:' Generic.Subheading
' ' Text
'[' Generic.Strong
'binary!' Keyword.Type
']' Generic.Strong
'\n ' Text
']' Generic.Strong
'\n ' Text
'resize:' Generic.Subheading
' ' Text
'"' Literal.String
'realloc' Literal.String
'"' Literal.String
' ' Text
'[' Generic.Strong
' ' Text
'; Resize memory allocation.\n' Comment
' ' Text
'memory' Name.Variable
' ' Text
'[' Generic.Strong
'binary!' Keyword.Type
']' Generic.Strong
'\n ' Text
'size' Name.Variable
' ' Text
'[' Generic.Strong
'size!' Keyword.Type
']' Generic.Strong
'\n ' Text
'return:' Generic.Subheading
' ' Text
'[' Generic.Strong
'binary!' Keyword.Type
']' Generic.Strong
'\n ' Text
']' Generic.Strong
'\n ' Text
']' Generic.Strong
'\n \n ' Text
'JVM!:' Generic.Subheading
' ' Text
'alias' Name.Exception
' ' Text
'struct!' Keyword.Type
' ' Text
'[' Generic.Strong
'\n ' Text
'reserved0' Name.Variable
' ' Text
'[' Generic.Strong
'int-ptr!' Keyword.Type
']' Generic.Strong
'\n ' Text
'reserved1' Name.Variable
' ' Text
'[' Generic.Strong
'int-ptr!' Keyword.Type
']' Generic.Strong
'\n ' Text
'reserved2' Name.Variable
' ' Text
'[' Generic.Strong
'int-ptr!' Keyword.Type
']' Generic.Strong
'\n \n ' Text
'DestroyJavaVM' Name.Variable
' ' Text
'[' Generic.Strong
'function!' Keyword.Type
' ' Text
'[' Generic.Strong
'[' Generic.Strong
'JNICALL' Keyword.Namespace
']' Generic.Strong
' ' Text
'vm' Name.Variable
' ' Text
'[' Generic.Strong
'JVM-ptr!' Keyword.Type
']' Generic.Strong
' ' Text
'return:' Generic.Subheading
' ' Text
'[' Generic.Strong
'jint!' Keyword.Type
']' Generic.Strong
']' Generic.Strong
']' Generic.Strong
'\n ' Text
'AttachCurrentThread' Name.Variable
' ' Text
'[' Generic.Strong
'function!' Keyword.Type
' ' Text
'[' Generic.Strong
'[' Generic.Strong
'JNICALL' Keyword.Namespace
']' Generic.Strong
' ' Text
'vm' Name.Variable
' ' Text
'[' Generic.Strong
'JVM-ptr!' Keyword.Type
']' Generic.Strong
' ' Text
'penv' Name.Variable
' ' Text
'[' Generic.Strong
'struct!' Keyword.Type
' ' Text
'[' Generic.Strong
'p' Name.Variable
' ' Text
'[' Generic.Strong
'int-ptr!' Keyword.Type
']' Generic.Strong
']' Generic.Strong
']' Generic.Strong
' ' Text
'args' Name.Variable
' ' Text
'[' Generic.Strong
'byte-ptr!' Keyword.Type
']' Generic.Strong
' ' Text
'return:' Generic.Subheading
' ' Text
'[' Generic.Strong
'jint!' Keyword.Type
']' Generic.Strong
']' Generic.Strong
']' Generic.Strong
'\n ' Text
'DetachCurrentThread' Name.Variable
' ' Text
'[' Generic.Strong
'function!' Keyword.Type
' ' Text
'[' Generic.Strong
'[' Generic.Strong
'JNICALL' Keyword.Namespace
']' Generic.Strong
' ' Text
'vm' Name.Variable
' ' Text
'[' Generic.Strong
'JVM-ptr!' Keyword.Type
']' Generic.Strong
' ' Text
'return:' Generic.Subheading
' ' Text
'[' Generic.Strong
'jint!' Keyword.Type
']' Generic.Strong
']' Generic.Strong
']' Generic.Strong
'\n ' Text
'GetEnv' Name.Variable
' ' Text
'[' Generic.Strong
'function!' Keyword.Type
' ' Text
'[' Generic.Strong
'[' Generic.Strong
'JNICALL' Keyword.Namespace
']' Generic.Strong
' ' Text
'vm' Name.Variable
' ' Text
'[' Generic.Strong
'JVM-ptr!' Keyword.Type
']' Generic.Strong
' ' Text
'penv' Name.Variable
' ' Text
'[' Generic.Strong
'struct!' Keyword.Type
' ' Text
'[' Generic.Strong
'p' Name.Variable
' ' Text
'[' Generic.Strong
'int-ptr!' Keyword.Type
']' Generic.Strong
']' Generic.Strong
']' Generic.Strong
' ' Text
'version' Name.Variable
' ' Text
'[' Generic.Strong
'integer!' Keyword.Type
']' Generic.Strong
' ' Text
'return:' Generic.Subheading
' ' Text
'[' Generic.Strong
'jint!' Keyword.Type
']' Generic.Strong
']' Generic.Strong
']' Generic.Strong
'\n ' Text
'AttachCurrentThreadAsDaemon' Name.Variable
' ' Text
'[' Generic.Strong
'function!' Keyword.Type
' ' Text
'[' Generic.Strong
'[' Generic.Strong
'JNICALL' Keyword.Namespace
']' Generic.Strong
' ' Text
'vm' Name.Variable
' ' Text
'[' Generic.Strong
'JVM-ptr!' Keyword.Type
']' Generic.Strong
' ' Text
'penv' Name.Variable
' ' Text
'[' Generic.Strong
'struct!' Keyword.Type
' ' Text
'[' Generic.Strong
'p' Name.Variable
' ' Text
'[' Generic.Strong
'int-ptr!' Keyword.Type
']' Generic.Strong
']' Generic.Strong
']' Generic.Strong
' ' Text
'args' Name.Variable
' ' Text
'[' Generic.Strong
'byte-ptr!' Keyword.Type
']' Generic.Strong
' ' Text
'return:' Generic.Subheading
' ' Text
'[' Generic.Strong
'jint!' Keyword.Type
']' Generic.Strong
']' Generic.Strong
']' Generic.Strong
'\n' Text
']' Generic.Strong
'\n\n ' Text
';just some datatypes for testing:\n' Comment
' \n ' Text
'#some-hash' Name.Label
'\n ' Text
'10-1-2013' Literal.String.Other
'\n ' Text
'quit' Name.Exception
'\n \n ' Text
';binary:\n' Comment
' ' Text
'#{00FF0000}' Literal.Number.Hex
'\n ' Text
'#{00FF0000 FF000000}' Literal.Number.Hex
'\n ' Text
'#{00FF0000\tFF000000}' Literal.Number.Hex
' ' Text
';with tab instead of space\n' Comment
' ' Text
'2#{' Literal.Number.Hex
'00001111' Literal.Number.Hex
'}' Literal.Number.Hex
'\n ' Text
'64#{/wAAAA==}' Literal.Number.Hex
'\n ' Text
'64#{/wAAA A==}' Literal.Number.Hex
' ' Text
';with space\t inside\n' Comment
' ' Text
'64#{/wAAA\tA==}' Literal.Number.Hex
' ' Text
';with tab inside\n' Comment
' \n \n ' Text
';string with char\n' Comment
' ' Text
'{' Literal.String
'bla ' Literal.String
'^(ff)' Literal.String.Escape
' foo' Literal.String
'}' Literal.String
'\n ' Text
'{' Literal.String
'bla ' Literal.String
'^(' Literal.String.Escape
'(' Literal.String
' foo' Literal.String
'}' Literal.String
'\n ' Text
';some numbers:\n' Comment
' ' Text
'12' Literal.Number
'\n ' Text
"1'000" Literal.Number
'\n ' Text
'1.2' Literal.Number.Float
'\n ' Text
'FF00FF00' Literal.Number.Hex
'h' Name.Variable
'\n' Text.Whitespace
' \n ' Text
';some tests of hexa number notation with not common ending\n' Comment
' ' Text
'[' Generic.Strong
'ff00' Literal.Number.Hex
'h' Name.Variable
' ' Text.Whitespace
'ff00' Literal.Number.Hex
'h' Name.Variable
']' Generic.Strong
' ' Text
'ff00' Literal.Number.Hex
'h' Name.Variable
'{' Literal.String
'}' Literal.String
' ' Text
'FF' Literal.Number.Hex
'h' Name.Variable
'"' Literal.String
'foo' Literal.String
'"' Literal.String
' ' Text
'00' Literal.Number.Hex
'h' Name.Variable
'(' Generic.Strong
'1' Literal.Number
' ' Text
'+' Operator
' ' Text
'2' Literal.Number
')' Generic.Strong
' ' Text
'(' Generic.Strong
'AE' Literal.Number.Hex
'h' Name.Variable
')' Generic.Strong
'\n\n' Text
';normal words:\n' Comment
'foo' Name.Variable
' ' Text
'char' Name.Variable
'\n\n' Text
';get-word\n' Comment
':foo' Generic.Subheading
'\n \n' Text
';lit-word:\n' Comment
"'foo" Name.Variable.Instance
' ' Text
"'foo" Name.Variable.Instance
'\n\n' Text
';multiple comment tests...\n' Comment
'1' Literal.Number
' ' Text
'+' Operator
' ' Text
'1' Literal.Number
'\n' Text
'comment "' Comment
'aa' Comment
'"' Comment
'\t\t\t\t\t\t\t\t\n' Text
'2' Literal.Number
' ' Text
'+' Operator
' ' Text
'2' Literal.Number
'\n' Text
'comment {' Comment
'aa' Comment
'}' Comment
'\n' Text
'3' Literal.Number
' ' Text
'+' Operator
' ' Text
'3' Literal.Number
'\n' Text
'comment {' Comment
'a' Comment
'^{' Comment
'}' Comment
'\n' Text
'4' Literal.Number
' ' Text
'+' Operator
' ' Text
'4' Literal.Number
'\n' Text
'comment {' Comment
'{' Comment
'}' Comment
'}' Comment
'\n' Text
'5' Literal.Number
' ' Text
'+' Operator
' ' Text
'5' Literal.Number
'\n' Text
'comment {' Comment
'\n\tfoo: 6\n' Comment
'}' Comment
'\n' Text
'6' Literal.Number
' ' Text
'+' Operator
' ' Text
'6' Literal.Number
'\n' Text
'comment [' Comment
'foo: 6' Comment
']' Comment
'\n' Text
'7' Literal.Number
' ' Text
'+' Operator
' ' Text
'7' Literal.Number
'\n' Text
'comment [' Comment
'foo: ' Comment
'"' Comment
'[' Comment
'"' Comment
' ' Comment
']' Comment
'\n' Text
'8' Literal.Number
' ' Text
'+' Operator
' ' Text
'8' Literal.Number
'\n' Text
'comment [' Comment
'foo: ' Comment
'{' Comment
'^{' Comment
'}' Comment
' ' Comment
']' Comment
'\n' Text
'9' Literal.Number
' ' Text
'+' Operator
' ' Text
'9' Literal.Number
'\n' Text
'comment [' Comment
'foo: ' Comment
'{' Comment
'boo' Comment
'}' Comment
' ' Comment
']' Comment
'\n' Text
'10' Literal.Number
' ' Text
'+' Operator
' ' Text
'10' Literal.Number
'\n' Text
'comment 5-May-2014/11:17:34+2:00' Comment
'\n' Text
'11' Literal.Number
' ' Text
'+' Operator
' ' Text
'11' Literal.Number
'\n\n\n' Text
'to-integer' Keyword
' ' Text
'foo' Name.Variable
'\n' Text
'foo' Name.Variable
'/' Name.Attribute
'(' Generic.Strong
'a' Name.Variable
' ' Text
'+' Operator
' ' Text
'1' Literal.Number
')' Generic.Strong
'/b' Name.Attribute
'\n\n' Text
'call' Name.Exception
'/output' Name.Attribute
' ' Text
'reform' Name.Variable
' ' Text
'[' Generic.Strong
"'which" Name.Variable.Instance
' ' Text
'interpreter' Name.Variable
']' Generic.Strong
' ' Text
'path:' Generic.Subheading
' ' Text
'copy' Name.Function
' ' Text
'"' Literal.String
'"' Literal.String
'\n\n ' Text
'version-1.1:' Generic.Subheading
' ' Text
'00010001' Literal.Number.Hex
'h' Name.Variable
'\n' Text.Whitespace
' \n ' Text
'#if' Keyword.Namespace
' ' Text
'type' Name.Variable
' ' Text
'=' Operator
' ' Text
"'exe" Name.Variable.Instance
' ' Text
'[' Generic.Strong
'\n ' Text
'push' Name.Exception
' ' Text
'system' Name.Exception
'/stack' Name.Attribute
'/frame' Name.Attribute
' ' Text
';-- save previous frame pointer\n' Comment
' ' Text
'system' Name.Exception
'/stack' Name.Attribute
'/frame:' Name.Attribute
' ' Text
'system' Name.Exception
'/stack' Name.Attribute
'/top' Name.Attribute
' ' Text
';-- @@ reposition frame pointer just after the catch flag\n' Comment
']' Generic.Strong
'\n' Text
'push' Name.Exception
' ' Text
'CATCH_ALL' Name.Variable
' ' Text
';-- exceptions root barrier\n' Comment
'push' Name.Exception
' ' Text
'0' Literal.Number
' ' Text
';-- keep stack aligned on 64-bit\n' Comment