del_vec 1.1 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071
  1. #!/bin/sh
  2. . ./Common
  3. ###############################################################################
  4. fped_dump "delete vector: it disappears" <<EOF
  5. v: vec @(0mm, 0mm)
  6. %del v
  7. EOF
  8. expect <<EOF
  9. /* MACHINE-GENERATED ! */
  10. package "_"
  11. unit mm
  12. EOF
  13. #------------------------------------------------------------------------------
  14. fped_dump "delete vector: references disappear" <<EOF
  15. v: vec @(0mm, 0mm)
  16. line v v
  17. %del v
  18. EOF
  19. expect <<EOF
  20. /* MACHINE-GENERATED ! */
  21. package "_"
  22. unit mm
  23. EOF
  24. #------------------------------------------------------------------------------
  25. fped_dump "delete vector: measurements disappear (same frame)" <<EOF
  26. v: vec @(0mm, 0mm)
  27. meas v -> v
  28. %del v
  29. EOF
  30. expect <<EOF
  31. /* MACHINE-GENERATED ! */
  32. package "_"
  33. unit mm
  34. EOF
  35. #------------------------------------------------------------------------------
  36. fped_dump "delete vector: measurements disappear (other frame)" <<EOF
  37. frame f {
  38. v: vec @(0mm, 0mm)
  39. }
  40. frame f @
  41. meas f.v -> f.v
  42. %del f.v
  43. EOF
  44. expect <<EOF
  45. /* MACHINE-GENERATED ! */
  46. frame f {
  47. }
  48. package "_"
  49. unit mm
  50. frame f @
  51. EOF
  52. ###############################################################################