Differential D12689 Diff 33594 autotests/folding/highlight.lua.fold

Changeset View

Standalone View

View Options

autotests/folding/highlight.lua.fold

  • This file was added.
1​#!/usr/bin/env lua
2​
3​-- Metatables
4​t = <beginfold id='2'>{</beginfold id='2'>
5​ __add=<beginfold id='1'>function</beginfold id='1'>(a,b)return a+b <endfold id='1'>end</endfold id='1'>,
6​ __sub=<beginfold id='1'>function</beginfold id='1'>(a,b)return a-b <endfold id='1'>end</endfold id='1'>,
7​ __mul=<beginfold id='1'>function</beginfold id='1'>(a,b)return a*b <endfold id='1'>end</endfold id='1'>,
8​ __div=<beginfold id='1'>function</beginfold id='1'>(a,b)return a/b <endfold id='1'>end</endfold id='1'>,
9​ __mod=<beginfold id='1'>function</beginfold id='1'>(a,b)return a%b <endfold id='1'>end</endfold id='1'>,
10​ __pow=<beginfold id='1'>function</beginfold id='1'>(a,b)return a^b <endfold id='1'>end</endfold id='1'>,
11​ __unm=<beginfold id='1'>function</beginfold id='1'>(a)return -a <endfold id='1'>end</endfold id='1'>,
12​ __idiv=<beginfold id='1'>function</beginfold id='1'>(a,b)return a//b <endfold id='1'>end</endfold id='1'>,
13​ __band=<beginfold id='1'>function</beginfold id='1'>(a,b)return a&b <endfold id='1'>end</endfold id='1'>,
14​ __bor=<beginfold id='1'>function</beginfold id='1'>(a,b)return a|b <endfold id='1'>end</endfold id='1'>,
15​ __bxor=<beginfold id='1'>function</beginfold id='1'>(a,b)return a~b <endfold id='1'>end</endfold id='1'>,
16​ __bnot=<beginfold id='1'>function</beginfold id='1'>(a)return ~a <endfold id='1'>end</endfold id='1'>,
17​ __shl=<beginfold id='1'>function</beginfold id='1'>(a,b)return a<<b <endfold id='1'>end</endfold id='1'>,
18​ __shr=<beginfold id='1'>function</beginfold id='1'>(a,b)return a>>b <endfold id='1'>end</endfold id='1'>,
19​ __concat=<beginfold id='1'>function</beginfold id='1'>(a,b)return a..b <endfold id='1'>end</endfold id='1'>,
20​ __len=<beginfold id='1'>function</beginfold id='1'>(a)return #a <endfold id='1'>end</endfold id='1'>,
21​ __eq=<beginfold id='1'>function</beginfold id='1'>(a,b)return a==b <endfold id='1'>end</endfold id='1'>,
22​ __lt=<beginfold id='1'>function</beginfold id='1'>(a,b)return a<b <endfold id='1'>end</endfold id='1'>,
23​ __le=<beginfold id='1'>function</beginfold id='1'>(a,b)return a<=b <endfold id='1'>end</endfold id='1'>,
24​ __index=<beginfold id='1'>function</beginfold id='1'>(t,k)return t[k] <endfold id='1'>end</endfold id='1'>,
25​ __newindex=<beginfold id='1'>function</beginfold id='1'>(t,k,v)return t[k]=v <endfold id='1'>end</endfold id='1'>,
26​ __call=<beginfold id='1'>function</beginfold id='1'>(f, ...)return f(...) <endfold id='1'>end</endfold id='1'>,
27​
28​ __tostring=<beginfold id='1'>function</beginfold id='1'>(a)return tostring(a) <endfold id='1'>end</endfold id='1'>,
29​ __pairs=<beginfold id='1'>function</beginfold id='1'>(t)return pairs(a) <endfold id='1'>end</endfold id='1'>,
30​ -- setmetatable
31​ __metatable=true
32​ -- Garbage collector
33​ __gc=<beginfold id='1'>function</beginfold id='1'>() <endfold id='1'>end</endfold id='1'>
34​ -- Weak table
35​ __mode='k' -- or 'v'
36​<endfold id='2'>}</endfold id='2'>
37​
38​a or b
39​a and b
40​a~=b
41​a>=b
42​true or false
43​a or nil
44​a::m
45​a.m
46​a;a
47​
48​
49​-- String
50​'\a'
51​'\b'
52​'\f'
53​'\n'
54​'\r'
55​'\t'
56​'\v'
57​'\\'
58​'\"'
59​'\''
60​'\z'
61​'\xff'
62​'\xFF'
63​'\231'
64​'\23'
65​'\2'
66​'\u{100201}' -- max 6 digits
67​'\2a\ks' -- error
68​
69​a = 'alo\n123"'
70​a = "alo\n123\""
71​a = '\97lo\10\04923"'
72​a = [[alo
73​123"]]
74​a = [==[
75​alo
76​123"]==]
77​
78​
79​-- Decimal
80​3
81​345
82​0xff
83​0xBEBADA
84​
85​-- Float
86​3.
87​.3
88​3.0
89​3.1416
90​314.16e-2
91​314.e+2
92​0.31416E1
93​34e1
94​0.e3
95​0x0.1E
96​0xA23p-4
97​0xA.p+4
98​0x.ap4
99​0X1.921FB54442D18P+1
100​-- error
101​32p
102​0xp-4
103​0x.p-4
104​
105​
106​-- single comment
107​xyz()
108​<beginfold id='4'>--[[</beginfold id='4'>
109​ long comment
110​<endfold id='4'>]]</endfold id='4'>
111​xyz()
112​
113​
114​a = <beginfold id='2'>{</beginfold id='2'> [f(1)] = g; "x", "y"; x = 1, f(x), [30] = 23; 45 <endfold id='2'>}</endfold id='2'>
115​
116​-- is equivalent to
117​
118​<beginfold id='1'>do</beginfold id='1'>
119​ local t = <beginfold id='2'>{</beginfold id='2'><endfold id='2'>}</endfold id='2'>
120​ t[f(1)] = g
121​ t[1] = "x" -- 1st exp
122​ t[2] = "y" -- 2nd exp
123​ t.x = 1 -- t["x"] = 1
124​ t[3] = f(x) -- 3rd exp
125​ t[30] = 23
126​ t[4] = 45 -- 4th exp
127​ a = t
128​<endfold id='1'>end</endfold id='1'>
129​
130​32-0x43+0x2-5
131​return"a"
132​return'a'
133​return<beginfold id='2'>{</beginfold id='2'><endfold id='2'>}</endfold id='2'>
134​f(3)
135​f'a'
136​f"a"
137​f<beginfold id='2'>{</beginfold id='2'>s=2<endfold id='2'>}</endfold id='2'>
138​f[[s]]
139​f[=[s]=]
140​#a
141​
142​local CONSTANT = a
143​
144​a = <beginfold id='2'>{</beginfold id='2'><endfold id='2'>}</endfold id='2'>
145​local x = 20
146​for i=1,10 <beginfold id='1'>do</beginfold id='1'>
147​ local y = 0
148​ a[i] = <beginfold id='1'>function</beginfold id='1'> () y=y+1; return x+y <endfold id='1'>end</endfold id='1'>
149​<endfold id='1'>end</endfold id='1'>
150​
151​--! \brief gfind is deprecated
152​string.gfind('s')
153​string.gmatch('f')