aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/bug.adb2
-rw-r--r--src/grt/grt-lib.ads2
-rw-r--r--src/grt/grt-main.adb2
-rw-r--r--src/grt/grt-processes.adb4
-rw-r--r--src/grt/grt-signals.ads2
-rw-r--r--src/vhdl/sem_expr.adb2
6 files changed, 7 insertions, 7 deletions
diff --git a/src/bug.adb b/src/bug.adb
index 667489de0..43f28317a 100644
--- a/src/bug.adb
+++ b/src/bug.adb
@@ -66,7 +66,7 @@ package body Bug is
New_Line (Standard_Error);
Put_Line
(Standard_Error,
- "******************** GHDL Bug occured ****************************");
+ "******************** GHDL Bug occurred ***************************");
Put_Line
(Standard_Error,
"Please report this bug on https://github.com/ghdl/ghdl/issues");
diff --git a/src/grt/grt-lib.ads b/src/grt/grt-lib.ads
index 5d0fdfa57..69c8a4c34 100644
--- a/src/grt/grt-lib.ads
+++ b/src/grt/grt-lib.ads
@@ -61,7 +61,7 @@ package Grt.Lib is
procedure Ghdl_Direction_Check_Failed (Filename : Ghdl_C_String;
Line: Ghdl_I32);
- -- Program error has occured:
+ -- Program error has occurred:
-- * configuration of an already configured block.
procedure Ghdl_Program_Error (Filename : Ghdl_C_String;
Line : Ghdl_I32;
diff --git a/src/grt/grt-main.adb b/src/grt/grt-main.adb
index 44abf5439..d50f8d7db 100644
--- a/src/grt/grt-main.adb
+++ b/src/grt/grt-main.adb
@@ -194,7 +194,7 @@ package body Grt.Main is
if Expect_Failure then
if Status >= 0 then
Expect_Failure := False;
- Error ("error expected, but none occured");
+ Error ("error expected, but none occurred");
end if;
else
if Status < 0 then
diff --git a/src/grt/grt-processes.adb b/src/grt/grt-processes.adb
index 3b3581d3f..fade31bab 100644
--- a/src/grt/grt-processes.adb
+++ b/src/grt/grt-processes.adb
@@ -931,8 +931,8 @@ package body Grt.Processes is
-- f) The following actions occur in the indicated order:
-- 2) For each process P, if P is currently sensitive to a signal S
- -- and if an event has occured on S in this simulation cycle, then
- -- P resumes.
+ -- and if an event has occurred on S in this simulation cycle,
+ -- then P resumes.
if Current_Time = Process_First_Timeout then
-- There are processes to awake.
Tn := Last_Time;
diff --git a/src/grt/grt-signals.ads b/src/grt/grt-signals.ads
index faaede9b6..f14d74076 100644
--- a/src/grt/grt-signals.ads
+++ b/src/grt/grt-signals.ads
@@ -282,7 +282,7 @@ package Grt.Signals is
-- If set, the signal is dumped in a GHW file.
Is_Dumped : Boolean;
- -- Set when an event occured.
+ -- Set when an event occurred.
-- Only reset by GHW file dumper.
RO_Event : Boolean;
diff --git a/src/vhdl/sem_expr.adb b/src/vhdl/sem_expr.adb
index ec73f37b6..92dcc408a 100644
--- a/src/vhdl/sem_expr.adb
+++ b/src/vhdl/sem_expr.adb
@@ -4773,7 +4773,7 @@ package body Sem_Expr is
Res := Sem_Expression_Ov (Cond, Null_Iir);
if Res = Null_Iir then
- -- Error occured.
+ -- Error occurred.
return Res;
end if;