diff --git a/tester.f90 b/tester.f90
index adf2ca7..ad8fb8d 100644
--- a/tester.f90
+++ b/tester.f90
@@ -14,7 +14,7 @@
 write(*,*) 'If the return value interface is fixed, none of these values will'
 write(*,*) 'be zero, nor will they be nonsensically large or small. On the'
 write(*,*) 'other hand, if the translation is incorrect, it is more likely'
-write(*,*) 'that this program will carsh.'
+write(*,*) 'that this program will crash.'
 write(*,*) ' '
 
 write(*,*) sdot(6,a(1,:),1,a(2,:),1), sdsdot(6,2.0,a(1,:),1,a(2,:),1), &