/trunk/Examples/test-suite/octave/array_member_runme.m

# · MATLAB · 25 lines · 17 code · 8 blank · 0 comment · 5 complexity · 63101fc35a8e9e520ab5d63757b5456f MD5 · raw file 

    

  1. array_member
    2. 

  2. 

  3. f = Foo();
    4. 

  4. f.data = cvar.global_data;
    5. 

  5. 

  6. for i=0:7,
    7. 

  7.     if (get_value(f.data,i) != get_value(cvar.global_data,i))
    8. 

  8.       error("Bad array assignment");
    9. 

  9.     endif
    10. 

  10. endfor
    11. 

  11. 

  12. for i=0:7,
    13. 

  13.     set_value(f.data,i,-i);
    14. 

  14. endfor
    15. 

  15. 

  16. cvar.global_data = f.data;
    17. 

  17. 

  18. for i=0:7,
    19. 

  19.   if (get_value(f.data,i) != get_value(cvar.global_data,i))
    20. 

  20.     error("Bad array assignment")
    21. 

  21.   endif
    22. 

  22. endfor
    23.