diff options
Diffstat (limited to 'otherlibs/labltk/example/tetris.ml')
| -rw-r--r-- | otherlibs/labltk/example/tetris.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/labltk/example/tetris.ml b/otherlibs/labltk/example/tetris.ml index 70571b114..9f11fc769 100644 --- a/otherlibs/labltk/example/tetris.ml +++ b/otherlibs/labltk/example/tetris.ml @@ -577,7 +577,7 @@ let _ = Textvariable.set scorev (string_of_int !score); if !line /10 <> pline /10 then - (* undate the background every 10 lines. *) + (* update the background every 10 lines. *) begin let num_image = List.length backgrounds - 1 in let n = !line/10 in @@ -682,7 +682,7 @@ let _ = in let game_init () = - (* Game Initialization *) + (* Game Initialization *) set_message "Initializing ..."; remove_timer (); image_load (List.hd backgrounds); |