diff --git a/packages/amunits/src/otherlibs/triton.pas b/packages/amunits/src/otherlibs/triton.pas index 5a10e81236..649bff89a6 100644 --- a/packages/amunits/src/otherlibs/triton.pas +++ b/packages/amunits/src/otherlibs/triton.pas @@ -221,7 +221,7 @@ correction factor *} {* Message classes *} CONST TRMS_CLOSEWINDOW = 1; {* The window should be closed *} - TRMS_ERROR = 2; {* An error occured. Error code in trm_Data *} + TRMS_ERROR = 2; {* An error occurred. Error code in trm_Data *} TRMS_NEWVALUE = 3; {* Object's VALUE has changed. New VALUE in trm_Data *} TRMS_ACTION = 4; {* Object has triggered an action *} diff --git a/packages/amunits/src/otherlibs/xadmaster.pas b/packages/amunits/src/otherlibs/xadmaster.pas index 43b131149e..37d8e4d3ce 100644 --- a/packages/amunits/src/otherlibs/xadmaster.pas +++ b/packages/amunits/src/otherlibs/xadmaster.pas @@ -220,7 +220,7 @@ const { do not create XADERR_EMPTY (V8) } XAD_NOEMPTYERROR = TAG_USER + 181; { tags for xadFreeHookAccess (V8) } - { error occured, call abort method (V8) } + { error occurred, call abort method (V8) } XAD_WASERROR = TAG_USER + 190; { tags for miscellaneous stuff } { xadArchiveInfo for stream hooks (V8) } @@ -314,7 +314,7 @@ const XADHC_INIT = 4; { end up hook work, free stuff } XADHC_FREE = 5; - { an error occured, delete partial stuff } + { an error occurred, delete partial stuff } XADHC_ABORT = 6; { complete input size is needed } XADHC_FULLSIZE = 7; diff --git a/packages/arosunits/src/amigados.pas b/packages/arosunits/src/amigados.pas index a5a6585434..3cd09e69a8 100644 --- a/packages/arosunits/src/amigados.pas +++ b/packages/arosunits/src/amigados.pas @@ -247,7 +247,7 @@ const ERROR_DIRECTORY_NOT_EMPTY = 216; // You tried to delete a directory that still contains some files. Delete these files first. ERROR_TOO_MANY_LEVELS = 217; // A recursive directory search could not be performed, because the stack was too small. ERROR_DEVICE_NOT_MOUNTED = 218; // You tried to access a device that is currently not mounted. - ERROR_SEEK_ERROR = 219; // An error occured, while executing DosSeek(). + ERROR_SEEK_ERROR = 219; // An error occurred, while executing DosSeek(). ERROR_COMMENT_TOO_BIG = 220; // The supplied file comment was longer than the hardcoded length limit for file comments. ERROR_DISK_FULL = 221; // A write-operation could not be performed, because the volume has no space left. ERROR_DELETE_PROTECTED = 222; // You tried to delete a delete-protected object. @@ -269,7 +269,7 @@ const ERROR_RECORD_NOT_LOCKED = 240; // You tried to access a record that was not locked. ERROR_LOCK_COLLISION = 241; // Somebody already locked a part of the record, you wanted to lock. ERROR_LOCK_TIMEOUT = 242; // LockRecord() timed out. - ERROR_UNLOCK_ERROR = 243; // An error occured, while unlocking a record. + ERROR_UNLOCK_ERROR = 243; // An error occurred, while unlocking a record. { more error codes are defined in dosasl.h and filesystem.h } diff --git a/packages/httpd13/src/ap.inc b/packages/httpd13/src/ap.inc index 6da834dbe6..b02cd9ee9e 100644 --- a/packages/httpd13/src/ap.inc +++ b/packages/httpd13/src/ap.inc @@ -123,7 +123,7 @@ function ap_vformatter(flush_func: flush_func_t; * is the number of characters placed in the buffer, excluding the * terminating NUL. All this implies that, at most, (len-1) characters * will be copied over; if the return value is >= len, then truncation - * occured. + * occurred. * * In no event does ap_snprintf return a negative number. } diff --git a/packages/libmicrohttpd/examples/largepost.pp b/packages/libmicrohttpd/examples/largepost.pp index 6293899ed5..4e023dc964 100644 --- a/packages/libmicrohttpd/examples/largepost.pp +++ b/packages/libmicrohttpd/examples/largepost.pp @@ -40,7 +40,7 @@ var BusyPage: Pcchar = 'This server is busy, please try again later.'; CompletePage: Pcchar = 'The upload has been completed.'; ErrorPage: Pcchar = 'This doesn''t seem to be right.'; - ServerErrorPage: Pcchar = 'An internal server error has occured.'; + ServerErrorPage: Pcchar = 'An internal server error has occurred.'; FileExistsPage: Pcchar = 'This file already exists.'; function SendPage(AConnection: PMHD_Connection; APage: Pcchar; AStatusCode: cint): cint; diff --git a/packages/libmicrohttpd/examples/responseheaders.pp b/packages/libmicrohttpd/examples/responseheaders.pp index e7fc0ca566..03d0bb582d 100644 --- a/packages/libmicrohttpd/examples/responseheaders.pp +++ b/packages/libmicrohttpd/examples/responseheaders.pp @@ -19,7 +19,7 @@ const AUrl: Pcchar; AMethod: Pcchar; AVersion: Pcchar; AUploadData: Pcchar; AUploadDataSize: Psize_t; AConCls: PPointer): cint; cdecl; const - errorstr: Pcchar = 'An internal server error has occured!'; + errorstr: Pcchar = 'An internal server error has occurred!'; var VFd: cint; VReturn: cint; diff --git a/packages/libndsfpc/src/nds/arm7/clock.inc b/packages/libndsfpc/src/nds/arm7/clock.inc index eb5f2df96f..bcb5f4bd9b 100644 --- a/packages/libndsfpc/src/nds/arm7/clock.inc +++ b/packages/libndsfpc/src/nds/arm7/clock.inc @@ -9,8 +9,8 @@ const READ_STATUS_REG1 = $61; STATUS_POC = (1 shl 7); // read-only, cleared by reading (1 if just powered on) STATUS_BLD = (1 shl 6); // read-only, cleared by reading (1 if power dropped below the safety threshold) - STATUS_INT2 = (1 shl 5); // read-only, INT2 has occured - STATUS_INT1 = (1 shl 4); // read-only, INT1 has occured + STATUS_INT2 = (1 shl 5); // read-only, INT2 has occurred + STATUS_INT1 = (1 shl 4); // read-only, INT1 has occurred STATUS_SC1 = (1 shl 3); // R/W scratch bit STATUS_SC0 = (1 shl 2); // R/W scratch bit STATUS_24HRS = (1 shl 1); // 24 hour mode when 1, 12 hour mode when 0 diff --git a/packages/os2units/src/som.pas b/packages/os2units/src/som.pas index 0224e39057..7b6d8bff25 100644 --- a/packages/os2units/src/som.pas +++ b/packages/os2units/src/som.pas @@ -858,7 +858,7 @@ Procedure somBeginPersistentIds; cdecl; (* space *) (* Under normal use (where ids are static varibles) the string *) (* associated with an id would only be freed if the code module in *) -(* which it occured was unloaded *) +(* which it occurred was unloaded *) Procedure somEndPersistentIds; cdecl; external 'som' name 'somEndPersistentIds'; {index 29} diff --git a/packages/paszlib/src/gzio.pas b/packages/paszlib/src/gzio.pas index 62b987b05d..4ee915db0f 100644 --- a/packages/paszlib/src/gzio.pas +++ b/packages/paszlib/src/gzio.pas @@ -1190,9 +1190,9 @@ end; { GZERROR =================================================================== - Returns the error message for the last error which occured on the + Returns the error message for the last error which occurred on the given compressed file. errnum is set to zlib error number. If an - error occured in the file system and not in the compression library, + error occurred in the file system and not in the compression library, errnum is set to Z_ERRNO and the application may consult errno to get the exact error code. diff --git a/packages/rtl-console/src/win/winevent.pp b/packages/rtl-console/src/win/winevent.pp index 8eb7277be7..eca85520b1 100644 --- a/packages/rtl-console/src/win/winevent.pp +++ b/packages/rtl-console/src/win/winevent.pp @@ -29,7 +29,7 @@ interface { these procedures must be used to set the event handlers } { these doesn't do something, they signal only the } - { the upper layer that an event occured, this event } + { the upper layer that an event occurred, this event } { must be handled with Win32-API function by the upper } { layer } Procedure SetMouseEventHandler(p : TEventProcedure); diff --git a/packages/rtl-objpas/src/inc/fmtbcd.pp b/packages/rtl-objpas/src/inc/fmtbcd.pp index 8ff1897dbe..9066d09449 100644 --- a/packages/rtl-objpas/src/inc/fmtbcd.pp +++ b/packages/rtl-objpas/src/inc/fmtbcd.pp @@ -1612,7 +1612,7 @@ IMPLEMENTATION if p < low ( Singles ) then begin exitloop := True; -(* what to do if error occured? *) +(* what to do if error occurred? *) RAISE eBCDOverflowException.create ( 'in IntegerToBCD' ); end; UNTIL exitloop; diff --git a/packages/symbolic/examples/easyevalexample.pp b/packages/symbolic/examples/easyevalexample.pp index 61480592f0..33ebadc430 100644 --- a/packages/symbolic/examples/easyevalexample.pp +++ b/packages/symbolic/examples/easyevalexample.pp @@ -46,6 +46,6 @@ begin writeln(s,'=',QuickEvaluate(s,['A','B'],[a,b]):10:1,' with A=',a:0:1,' and B=',b); except on E:Exception do - Writeln('An exception occured: ',e.message); + Writeln('An exception occurred: ',e.message); end; end. \ No newline at end of file diff --git a/packages/winceunits/src/ras.pp b/packages/winceunits/src/ras.pp index 8a1f10a07d..ab9f094598 100644 --- a/packages/winceunits/src/ras.pp +++ b/packages/winceunits/src/ras.pp @@ -676,7 +676,7 @@ type {$IFDEF WINCE} // #ifdef UNDER_CE // This structure is used by the RnaApp application on WINCE -// to signal when a connection has occured. +// to signal when a connection has occurred. type tagRNAAppInfo = record diff --git a/packages/x11/src/xinput.pp b/packages/x11/src/xinput.pp index 463177d73d..668a311578 100644 --- a/packages/x11/src/xinput.pp +++ b/packages/x11/src/xinput.pp @@ -121,7 +121,7 @@ type display: PDisplay; { Display the event was read from } window: TWindow; { "event" window reported relative to } deviceid: TXID; - root: TWindow; { root window event occured on } + root: TWindow; { root window event occurred on } subwindow: TWindow; { child window } time: TTime; { milliseconds } x, y: cint; { x, y coordinates in event window } @@ -156,7 +156,7 @@ type display: PDisplay; { Display the event was read from } window: TWindow; { "event" window reported relative to } deviceid: TXID; - root: TWindow; { root window that the event occured on } + root: TWindow; { root window that the event occurred on } subwindow: TWindow; { child window } time: TTime; { milliseconds } x, y: cint; { x, y coordinates in event window } @@ -191,7 +191,7 @@ type display: PDisplay; { Display the event was read from } window: TWindow; { "event" window reported relative to } deviceid: TXID; - root: TWindow; { root window that the event occured on } + root: TWindow; { root window that the event occurred on } subwindow: TWindow; { child window } time: TTime; { milliseconds } x, y: cint; { x, y coordinates in event window } diff --git a/packages/zorba/src/xqc.pas b/packages/zorba/src/xqc.pas index 73b9ce92b0..9dc4ea708a 100644 --- a/packages/zorba/src/xqc.pas +++ b/packages/zorba/src/xqc.pas @@ -1990,7 +1990,7 @@ type * \param length The length of the buffer * * \return The number of bytes read - this will be less than length if the end of the input is reached - * or -1 if an error occured + * or -1 if an error occurred * *) read: function(stream: XQC_InputStream; const buf: pchar; length: cuint): cint; extdecl; @@ -2035,8 +2035,8 @@ type * (e.g. for errors not defined in the spec). * \param description A detailed description of the error or an empty string if no description is available. * \param query_uri The uri of the query causing the error or an empty string if no uri is available for the query. - * \param line The line number of the query where the error occured. - * \param components The column number in the line in the query where the error occured. + * \param line The line number of the query where the error occurred. + * \param components The column number in the line in the query where the error occurred. *) error: procedure(handler: XQC_ErrorHandler; error: XQUERY_ERROR; const local_name, description, query_uri: pchar; line, column: cuint); extdecl;