Changeset 3171


Ignore:
Timestamp:
Aug 14, 2012, 8:42:28 PM (3 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.