[commit] r2335 - dev/hdaudio ofw/gui

[repository service]

Author: wmb
Date: Wed Jul  6 08:33:31 2011
New Revision: 2335
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2335

Log:
OLPC XO-1.75 - Eliminated some isn't unique compilation warnings.

Modified:
   dev/hdaudio/test.fth
   ofw/gui/ofpong.fth

Modified: dev/hdaudio/test.fth
==============================================================================
--- dev/hdaudio/test.fth	Wed Jul  6 08:32:32 2011	(r2334)
+++ dev/hdaudio/test.fth	Wed Jul  6 08:33:31 2011	(r2335)
@@ -196,6 +196,7 @@
    test-with-loopback throw
    disconnect-loopback
 ;
+warning @ warning off
 : selftest  ( -- error? )
    diagnostic-mode?  if
       open 0=  if  ." Failed to open /audio" cr true exit  then
@@ -207,6 +208,7 @@
       selftest         ( error? )
    then
 ;
+warning !

\ LICENSE_BEGIN
 \ Copyright (c) 2009 Luke Gorrie

Modified: ofw/gui/ofpong.fth
==============================================================================
--- ofw/gui/ofpong.fth	Wed Jul  6 08:32:32 2011	(r2334)
+++ ofw/gui/ofpong.fth	Wed Jul  6 08:33:31 2011	(r2335)
@@ -213,7 +213,7 @@
    erasecol -rot  swap           swap unscale  ballsize batsize  paintrect
 ;

-: redraw ( -- )
+: redraw-table ( -- )
    drawcol  0 0                    screenw  ballsize  paintrect
    drawcol  0 screenh  ballsize -  screenw  ballsize  paintrect

@@ -230,7 +230,7 @@
 : drawboard ( -- )
   drawcol   0 0  screenw screenh  paintrect
   erasecol  0 0  screenw screenh  paintrect
-  redraw
+  redraw-table
 ;

: resetball ( -- )