From 2a93e65511cc09cd0723e63fd74e88f693a1c140 Mon Sep 17 00:00:00 2001 From: florian Date: Sun, 2 Jan 2022 13:12:33 +0100 Subject: [PATCH] * seperator => separator --- compiler/arm/armreg.dat | 2 +- compiler/arm/cgcpu.pas | 2 +- compiler/globals.pas | 4 ++-- compiler/globtype.pas | 4 ++-- compiler/hlcgobj.pas | 2 +- compiler/ngenutil.pas | 2 +- compiler/scanner.pas | 8 ++++---- compiler/utils/ppuutils/ppudump.pp | 2 +- rtl/inc/text.inc | 4 ++-- rtl/objpas/sysutils/datih.inc | 4 ++-- tests/tbf/tb0287.pp | 2 +- tests/tbf/tb0288.pp | 2 +- tests/tbf/tb0289.pp | 2 +- tests/tbf/tb0290.pp | 2 +- tests/tbs/tb0690.pp | 2 +- 15 files changed, 22 insertions(+), 22 deletions(-) diff --git a/compiler/arm/armreg.dat b/compiler/arm/armreg.dat index 87887d5d01..933662ace1 100644 --- a/compiler/arm/armreg.dat +++ b/compiler/arm/armreg.dat @@ -38,7 +38,7 @@ F7,$02,$00,$07,f7,32,23 ; allocator because it cannot deal with D0 conflicting with both S0 and S1. ; This unfortunately means that we can only use 16 single precision registers ; instead of 32, even if no double precision ones are used... -; Nevertheless the odd numbered single registers must have seperate register +; Nevertheless the odd numbered single registers must have separate register ; numbers to allow implementation of the "EABI VFP hardfloat" calling convention. S0,$04,$06,$00,s0,0,0 diff --git a/compiler/arm/cgcpu.pas b/compiler/arm/cgcpu.pas index 2b8df5da67..81864ed97c 100644 --- a/compiler/arm/cgcpu.pas +++ b/compiler/arm/cgcpu.pas @@ -3301,7 +3301,7 @@ unit cgcpu; end else handle_load_store(list,A_VSTR,PF_None,tmpmmreg,ref); - { VSTR cannot generate an FPU exception, VCVT is handled seperately, so we do not need a check here } + { VSTR cannot generate an FPU exception, VCVT is handled separately, so we do not need a check here } end; diff --git a/compiler/globals.pas b/compiler/globals.pas index e40086d28c..159ed186c0 100644 --- a/compiler/globals.pas +++ b/compiler/globals.pas @@ -55,7 +55,7 @@ interface m_pointer_2_procedure,m_autoderef,m_tp_procvar,m_initfinal,m_default_ansistring, m_out,m_default_para,m_duplicate_names,m_hintdirective, m_property,m_default_inline,m_except,m_advanced_records, - m_array_operators,m_prefixed_attributes,m_underscoreisseperator]; + m_array_operators,m_prefixed_attributes,m_underscoreisseparator]; delphiunicodemodeswitches = delphimodeswitches + [m_systemcodepage,m_default_unicodestring]; fpcmodeswitches = [m_fpc,m_string_pchar,m_nested_comment,m_repeat_forward, @@ -306,7 +306,7 @@ interface exepath : TPathStr; { Path to unicode charmap/collation binaries } unicodepath : TPathStr; - { path for searching units, different paths can be seperated by ; } + { path for searching units, different paths can be separated by ; } librarysearchpath, unitsearchpath, objectsearchpath, diff --git a/compiler/globtype.pas b/compiler/globtype.pas index e6f8317338..a1df087589 100644 --- a/compiler/globtype.pas +++ b/compiler/globtype.pas @@ -528,7 +528,7 @@ interface m_multi_helpers, { helpers can appear in multiple scopes simultaneously } m_array2dynarray, { regular arrays can be implicitly converted to dynamic arrays } m_prefixed_attributes, { enable attributes that are defined before the type they belong to } - m_underscoreisseperator{ _ can be used as seperator to group digits in numbers } + m_underscoreisseparator{ _ can be used as separator to group digits in numbers } ); tmodeswitches = set of tmodeswitch; @@ -721,7 +721,7 @@ interface 'MULTIHELPERS', 'ARRAYTODYNARRAY', 'PREFIXEDATTRIBUTES', - 'UNDERSCOREISSEPERATOR' + 'UNDERSCOREISSEPARATOR' ); diff --git a/compiler/hlcgobj.pas b/compiler/hlcgobj.pas index e0f415d580..82b7587d36 100644 --- a/compiler/hlcgobj.pas +++ b/compiler/hlcgobj.pas @@ -5478,7 +5478,7 @@ implementation begin pd:=search_system_proc('fpc_stackcheck'); paraloc1.init; - { The parameter to fpc_stackcheck is loaded seperately via + { The parameter to fpc_stackcheck is loaded separately via gen_stack_check_size_para() } paramanager.getcgtempparaloc(list,pd,1,paraloc1); paramanager.freecgpara(list,paraloc1); diff --git a/compiler/ngenutil.pas b/compiler/ngenutil.pas index 6502755469..617bf49888 100644 --- a/compiler/ngenutil.pas +++ b/compiler/ngenutil.pas @@ -493,7 +493,7 @@ implementation if mf_classinits in current_module.moduleflags then append_struct_initfinis(current_module, potype_class_constructor, stat); end; - { units have seperate code for initilization and finalization } + { units have separate code for initilization and finalization } potype_unitfinalize: ; { program init/final is generated in separate procedure } potype_proginit: ; diff --git a/compiler/scanner.pas b/compiler/scanner.pas index 9c9f03fe20..d2406b01d5 100644 --- a/compiler/scanner.pas +++ b/compiler/scanner.pas @@ -3625,7 +3625,7 @@ type exit; repeat { still more to read?, then change the #0 to a space so its seen - as a seperator, this can't be used for macro's which can change + as a separator, this can't be used for macro's which can change the place of the #0 in the buffer with tempopen } if (c=#0) and (bufsize>0) and not(inputfile.is_macro) and @@ -4233,7 +4233,7 @@ type ((base=16) and (c in ['A'..'F','a'..'f'])) or ((base=8) and (c in ['0'..'7'])) or ((base=2) and (c in ['0'..'1'])) or - ((m_underscoreisseperator in current_settings.modeswitches) and firstdigitread and (c='_')) do + ((m_underscoreisseparator in current_settings.modeswitches) and firstdigitread and (c='_')) do begin if (i<255) and (c<>'_') then begin @@ -5012,7 +5012,7 @@ type pattern:=pattern+'.'; firstdigitread:=false; while (c in ['0'..'9']) or - ((m_underscoreisseperator in current_settings.modeswitches) and firstdigitread and (c='_')) do + ((m_underscoreisseparator in current_settings.modeswitches) and firstdigitread and (c='_')) do begin if c<>'_' then pattern:=pattern+c; @@ -5042,7 +5042,7 @@ type Illegal_Char(c); firstdigitread:=false; while (c in ['0'..'9']) or - ((m_underscoreisseperator in current_settings.modeswitches) and firstdigitread and (c='_')) do + ((m_underscoreisseparator in current_settings.modeswitches) and firstdigitread and (c='_')) do begin if c<>'_' then pattern:=pattern+c; diff --git a/compiler/utils/ppuutils/ppudump.pp b/compiler/utils/ppuutils/ppudump.pp index 5320386443..5daeb80c0b 100644 --- a/compiler/utils/ppuutils/ppudump.pp +++ b/compiler/utils/ppuutils/ppudump.pp @@ -2427,7 +2427,7 @@ const 'm_multi_helpers', { helpers can appear in multiple scopes simultaneously } 'm_array2dynarray', { regular arrays can be implicitly converted to dynamic arrays } 'm_prefixed_attributes', { enable attributes that are defined before the type they belong to } - 'm_underscoreisseperator'{ _ can be used as seperator to group digits in numbers } + 'm_underscoreisseparator'{ _ can be used as separator to group digits in numbers } ); { optimizer } optimizerswitchname : array[toptimizerswitch] of string[50] = diff --git a/rtl/inc/text.inc b/rtl/inc/text.inc index a9ad8a6bf9..dbdcb26d9b 100644 --- a/rtl/inc/text.inc +++ b/rtl/inc/text.inc @@ -1631,7 +1631,7 @@ Begin repeat prev := TextRec(f).BufPtr^[TextRec(f).BufPos]; inc(TextRec(f).BufPos); -{ no system uses #10#13 as line seperator (#10 = *nix, #13 = Mac, } +{ no system uses #10#13 as line separator (#10 = *nix, #13 = Mac, } { #13#10 = Dos), so if we've got #10, we can safely exit } if prev = #10 then exit; @@ -1686,7 +1686,7 @@ Begin repeat prev := TextRec(f).BufPtr^[TextRec(f).BufPos]; inc(TextRec(f).BufPos); -{ no system uses #10#13 as line seperator (#10 = *nix, #13 = Mac, } +{ no system uses #10#13 as line separator (#10 = *nix, #13 = Mac, } { #13#10 = Dos), so if we've got #10, we can safely exit } if prev = #10 then exit; diff --git a/rtl/objpas/sysutils/datih.inc b/rtl/objpas/sysutils/datih.inc index 7f8aece31f..eb047b0d44 100644 --- a/rtl/objpas/sysutils/datih.inc +++ b/rtl/objpas/sysutils/datih.inc @@ -84,8 +84,8 @@ var tt : longtimeformat am/pm : use 12 hour clock and display am and pm accordingly a/p : use 12 hour clock and display a and p accordingly - / : insert date seperator - : : insert time seperator + / : insert date separator + : : insert time separator "xx" : literal text 'xx' : literal text } diff --git a/tests/tbf/tb0287.pp b/tests/tbf/tb0287.pp index 382e9e65de..6a1f11e392 100644 --- a/tests/tbf/tb0287.pp +++ b/tests/tbf/tb0287.pp @@ -1,5 +1,5 @@ { %fail } -{$modeswitch underscoreisseperator} +{$modeswitch underscoreisseparator} begin writeln(_123567); diff --git a/tests/tbf/tb0288.pp b/tests/tbf/tb0288.pp index f983249a44..679d39738b 100644 --- a/tests/tbf/tb0288.pp +++ b/tests/tbf/tb0288.pp @@ -1,5 +1,5 @@ { %fail } -{$modeswitch underscoreisseperator} +{$modeswitch underscoreisseparator} begin writeln($_123567); diff --git a/tests/tbf/tb0289.pp b/tests/tbf/tb0289.pp index 6097b4fe0a..e07768027f 100644 --- a/tests/tbf/tb0289.pp +++ b/tests/tbf/tb0289.pp @@ -1,5 +1,5 @@ { %fail } -{$modeswitch underscoreisseperator} +{$modeswitch underscoreisseparator} begin writeln(123567._1234); diff --git a/tests/tbf/tb0290.pp b/tests/tbf/tb0290.pp index 1f5752be51..23734bb953 100644 --- a/tests/tbf/tb0290.pp +++ b/tests/tbf/tb0290.pp @@ -1,5 +1,5 @@ { %fail } -{$modeswitch underscoreisseperator} +{$modeswitch underscoreisseparator} begin writeln(123567.1234e_12); diff --git a/tests/tbs/tb0690.pp b/tests/tbs/tb0690.pp index c5058bd508..f888f1a289 100644 --- a/tests/tbs/tb0690.pp +++ b/tests/tbs/tb0690.pp @@ -1,4 +1,4 @@ { %norun } -{$modeswitch underscoreisseperator} +{$modeswitch underscoreisseparator} {$i ib0690.inc}