Changeset 3326


Ignore:
Timestamp:
Sep 26, 2012, 3:48:31 AM (3 years ago)
Author:
quozl
Message:

OLPC XO-1 XO-1.75 XO-4 - fix broken XO-1 build, avoid core words in FCode camera driver on XO-1, and move image sensor probe into load file for XO-1.75 and XO-4.

Location:
dev/olpc
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • dev/olpc/imagesensor.fth

    r3235 r3326  
    1313   false
    1414;
     15
    1516: set-sensor-properties  ( name$ i2c-addr -- )
    1617   my-self >r  0 to my-self
    17    " /image-sensor" find-device  ( name$ i2c-addr )
    18       " reg" get-property  if    ( name$ i2c-addr )
    19          1 reg                   ( name$ )
    20          +compatible             ( )
    21       else                       ( name$ i2c-addr regval$ )
    22          2drop 3drop             ( )
    23       then
    24    device-end
     18   " /image-sensor" find-package  if       ( name$ i2c-addr phandle )
     19      " reg" rot get-package-property  if  ( name$ i2c-addr )
     20         1 reg                             ( name$ )
     21         encode-string  " compatible" property
     22      else                                 ( name$ i2c-addr regval$ )
     23         2drop 3drop                       ( )
     24      then                                 ( )
     25   else                                    ( name$ i2c-addr )
     26      3drop                                ( )
     27   then                                    ( )
    2528   r> to my-self
    2629;
    27 
    28 also forth definitions
    29 : probe-image-sensor  ( -- )
    30    " /camera" open-dev close-dev
    31 ;
    32 previous definitions
  • dev/olpc/mmp2camera/loadpkg.fth

    r3289 r3326  
    4848   fload ${BP}/dev/olpc/cameratest.fth
    4949end-package
     50: probe-image-sensor  ( -- )
     51   " /camera" open-dev close-dev
     52;
Note: See TracChangeset for help on using the changeset viewer.