Skip to content

Commit f322429

Browse files
committed
Spellchecked, tiny improvements
1 parent fc41cf2 commit f322429

File tree

4 files changed

+21
-4
lines changed

4 files changed

+21
-4
lines changed

.vscode/settings.json

Lines changed: 15 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -4,36 +4,50 @@
44
"cSpell.words": [
55
"adoc",
66
"advancedrecords",
7+
"anonymousfunctions",
8+
"anotherunit",
79
"apptype",
810
"ASCIIDOCTOR",
911
"coderay",
12+
"Contnrs",
1013
"corba",
14+
"deallocates",
1115
"deallocation",
1216
"docbook",
1317
"docinfo",
1418
"downto",
1519
"dylib",
1620
"execdir",
1721
"fopub",
22+
"FpJsonRtti",
23+
"functionreferences",
1824
"htdocs",
1925
"ifdef",
26+
"ifndef",
2027
"Kamburelis",
2128
"logcat",
2229
"Michalis",
2330
"modeswitch",
2431
"MSWINDOWS",
2532
"myprogram",
2633
"myunit",
34+
"nestedprocvars",
2735
"noimages",
2836
"objfpc",
37+
"objpas",
38+
"Readln",
39+
"RTTI",
2940
"scopedenums",
3041
"sectnums",
42+
"showcolor",
3143
"sprintf",
3244
"TFPG",
45+
"TMyInts",
3346
"toclevels",
3447
"typecasted",
3548
"Unported",
3649
"unversioned",
37-
"wordmark"
50+
"wordmark",
51+
"Writeln"
3852
]
3953
}

code-samples/anon_functions_list_map_foreach.dpr

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -95,7 +95,7 @@ begin
9595
MyList.ForEach(procedure(const Index, Item: Integer)
9696
begin
9797
WriteLn('Index: ', Index, ', Item: ', Item);
98-
WriteLn(' If we would proces it by F: ', F(Index, Item));
98+
WriteLn(' If we would process it by F: ', F(Index, Item));
9999
end);
100100
finally FreeAndNil(MyList) end;
101101
end.

code-samples/delphi_and_fpc_differences/compare_function_pointers.dpr

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -65,7 +65,7 @@ begin
6565
{$endif}
6666

6767
{ Finally, this is valid in both modes and does the same:
68-
compares the values of X and Y. Using () forces the call of parameterless
68+
compares the values of X and Y. Using () forces the call of parameter-less
6969
function. }
7070
if X() = Y() then
7171
Writeln('X() or Y(): Equal')

modern_pascal_introduction.adoc

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1946,7 +1946,10 @@ Unfortunately, you need to write ugly `@TMyClass(nil).Add` instead of just `@TMy
19461946

19471947
### Anonymous functions
19481948

1949-
Delphi and new FPC versions (>= 3.3.1) support anynomous functions.
1949+
Delphi and new FPC versions (>= 3.3.1) support:
1950+
1951+
- anonymous functions (define function implementation right when you assign it to a variable or pass as an argument),
1952+
- and function references (a new type of "function callback" that can accept a wide range of function types, including global functions, methods and anonymous functions).
19501953

19511954
Example:
19521955

0 commit comments

Comments
 (0)