Changeset 3171


Ignore:
Timestamp:
Aug 14, 2012, 10:42:28 PM (2 years ago)
Author:
wmb
Message:

OLPC - Renamed gpio-prop to gpio-property and changed the argument order for conformance with Forth conventions.

Location:
cpu/arm/mmp2
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • cpu/arm/mmp2/gpio.fth

    r3168 r3171  
    7979end-package 
    8080 
    81 : gpio-prop ( $gpioname low? gpionum -- ) 
    82    " /gpio"  encode-phandle        ( $gpioname low? gpionum propval$ ) 
    83    rot    encode-int encode+         ( $gpioname low? propval$' ) 
    84    rot    encode-int encode+         ( $gpioname propval$' ) 
    85    2swap property 
     81: gpio-property  ( gpionum low? gpioname$ -- ) 
     82   2>r swap                     ( low? gpionum           r: gpioname$ ) 
     83   " /gpio"  encode-phandle     ( low? gpionum propval$  r: gpioname$ ) 
     84   rot encode-int encode+       ( low? propval$'         r: gpioname$ ) 
     85   rot encode-int encode+       ( propval$'              r: gpioname$ ) 
     86   2r> property                 ( ) 
    8687; 
    87  
    88  
  • cpu/arm/mmp2/twsi.fth

    r3169 r3171  
    214214   " zforce" +compatible 
    215215   my-address my-space 1 reg 
    216    " reset-gpio" 1  d# 98  gpio-prop 
    217    " test-gpio"  1  d# 139 gpio-prop 
    218    " hd-gpio"    1  d# 12  gpio-prop 
    219    " dr-gpio"    1  d# 99  gpio-prop 
     216   touch-rst-gpio# 1  " reset-gpio" gpio-property 
     217   touch-tck-gpio# 1  " test-gpio"  gpio-property 
     218   touch-hd-gpio#  1  " hd-gpio"    gpio-property 
     219   touch-int-gpio# 1  " dr-gpio"    gpio-property 
    220220end-package 
    221221[then] 
Note: See TracChangeset for help on using the changeset viewer.