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

# · MATLAB · 20 lines · 17 code · 3 blank · 0 comment · 3 complexity · d60ea74e7cc3837fadb765ef21164ddc MD5 · raw file 

    

  1. li_implicit
    2. 

  2. b = B();
    3. 

  3. ai = A(1);
    4. 

  4. ad = A(2.0);
    5. 

  5. ab = A(b);
    6. 

  6. 

  7. ai, get(ai);
    8. 

  8. ad, get(ad);
    9. 

  9. ab, get(ab);
    10. 

  10. 

  11. if (get(ai) != get(1))
    12. 

  12.   error("bad implicit type")
    13. 

  13. endif
    14. 

  14. if (get(ad) != get(2.0))
    15. 

  15.   error("bad implicit type")
    16. 

  16. endif
    17. 

  17. if (get(ab) != get(b))
    18. 

  18.   error("bad implicit type")
    19. 

  19. endif
    20.