2010-04-27 04:02:24 +03:00
|
|
|
#!/bin/sh
|
|
|
|
. ./Common
|
|
|
|
|
|
|
|
###############################################################################
|
|
|
|
|
2010-04-27 13:57:09 +03:00
|
|
|
fped_dump "frame reference: \"frame\" (origin)" <<EOF
|
2010-04-27 04:02:24 +03:00
|
|
|
frame f {}
|
|
|
|
frame f @
|
|
|
|
EOF
|
|
|
|
expect <<EOF
|
|
|
|
/* MACHINE-GENERATED ! */
|
|
|
|
|
|
|
|
frame f {
|
|
|
|
}
|
|
|
|
|
|
|
|
package "_"
|
|
|
|
unit mm
|
2010-10-12 18:32:15 +03:00
|
|
|
|
2010-04-27 04:02:24 +03:00
|
|
|
frame f @
|
|
|
|
EOF
|
|
|
|
|
|
|
|
#------------------------------------------------------------------------------
|
|
|
|
|
2010-04-27 13:57:09 +03:00
|
|
|
fped_dump "frame reference: \"%frame\" (current frame origin)" <<EOF
|
2010-04-27 04:02:24 +03:00
|
|
|
frame f {}
|
|
|
|
%frame f @
|
|
|
|
EOF
|
|
|
|
expect <<EOF
|
|
|
|
/* MACHINE-GENERATED ! */
|
|
|
|
|
|
|
|
frame f {
|
|
|
|
}
|
|
|
|
|
|
|
|
package "_"
|
|
|
|
unit mm
|
2010-10-12 18:32:15 +03:00
|
|
|
|
2010-04-27 04:02:24 +03:00
|
|
|
frame f @
|
|
|
|
EOF
|
|
|
|
|
|
|
|
#------------------------------------------------------------------------------
|
|
|
|
|
2010-04-27 13:57:09 +03:00
|
|
|
fped_dump "frame reference: \"%frame\" (current frame vector)" <<EOF
|
2010-04-27 04:02:24 +03:00
|
|
|
frame f {}
|
|
|
|
v: vec @(0mm, 0mm)
|
|
|
|
%frame f v
|
|
|
|
EOF
|
|
|
|
expect <<EOF
|
|
|
|
/* MACHINE-GENERATED ! */
|
|
|
|
|
|
|
|
frame f {
|
|
|
|
}
|
|
|
|
|
|
|
|
package "_"
|
|
|
|
unit mm
|
2010-10-12 18:32:15 +03:00
|
|
|
|
2010-04-27 04:02:24 +03:00
|
|
|
v: vec @(0mm, 0mm)
|
|
|
|
frame f .
|
|
|
|
EOF
|
|
|
|
|
|
|
|
#------------------------------------------------------------------------------
|
|
|
|
|
2010-04-27 13:57:09 +03:00
|
|
|
fped_dump "frame reference: \"%frame\" (other frame origin)" <<EOF
|
2010-04-27 04:02:24 +03:00
|
|
|
frame f {}
|
|
|
|
frame g {}
|
|
|
|
%frame f g.@
|
|
|
|
EOF
|
|
|
|
expect <<EOF
|
|
|
|
/* MACHINE-GENERATED ! */
|
|
|
|
|
|
|
|
frame f {
|
|
|
|
}
|
|
|
|
|
|
|
|
frame g {
|
|
|
|
frame f @
|
|
|
|
}
|
|
|
|
|
|
|
|
package "_"
|
|
|
|
unit mm
|
2010-10-12 18:32:15 +03:00
|
|
|
|
2010-04-27 04:02:24 +03:00
|
|
|
EOF
|
|
|
|
|
|
|
|
#------------------------------------------------------------------------------
|
|
|
|
|
2010-04-27 13:57:09 +03:00
|
|
|
fped_dump "frame reference: \"%frame\" (other frame base)" <<EOF
|
2010-04-27 04:02:24 +03:00
|
|
|
frame f {}
|
|
|
|
frame g {
|
|
|
|
v: vec @(0mm, 0mm)
|
|
|
|
}
|
|
|
|
%frame f g.v
|
|
|
|
EOF
|
|
|
|
expect <<EOF
|
|
|
|
/* MACHINE-GENERATED ! */
|
|
|
|
|
|
|
|
frame f {
|
|
|
|
}
|
|
|
|
|
|
|
|
frame g {
|
|
|
|
v: vec @(0mm, 0mm)
|
|
|
|
frame f .
|
|
|
|
}
|
|
|
|
|
|
|
|
package "_"
|
|
|
|
unit mm
|
2010-10-12 18:32:15 +03:00
|
|
|
|
2010-04-27 04:02:24 +03:00
|
|
|
EOF
|
|
|
|
|
|
|
|
#------------------------------------------------------------------------------
|
|
|
|
|
2010-04-27 13:57:09 +03:00
|
|
|
fped_fail "frame reference: \"%frame\" (cycle)" <<EOF
|
2010-04-27 04:02:24 +03:00
|
|
|
frame f {
|
|
|
|
}
|
|
|
|
|
|
|
|
frame g {
|
|
|
|
frame f @
|
|
|
|
}
|
|
|
|
|
|
|
|
%frame g f.@
|
|
|
|
EOF
|
|
|
|
expect <<EOF
|
|
|
|
8: frame "g" is a parent of "f" near "@"
|
|
|
|
EOF
|
|
|
|
|
|
|
|
#------------------------------------------------------------------------------
|
|
|
|
|
2010-04-27 13:57:09 +03:00
|
|
|
fped_dump "frame reference: \"%frame\" (out-of-order)" <<EOF
|
2010-04-27 04:02:24 +03:00
|
|
|
frame f {
|
|
|
|
}
|
|
|
|
|
|
|
|
frame g {
|
|
|
|
}
|
|
|
|
|
|
|
|
%frame g f.@
|
|
|
|
EOF
|
|
|
|
expect <<EOF
|
|
|
|
/* MACHINE-GENERATED ! */
|
|
|
|
|
|
|
|
frame g {
|
|
|
|
}
|
|
|
|
|
|
|
|
frame f {
|
|
|
|
frame g @
|
|
|
|
}
|
|
|
|
|
|
|
|
package "_"
|
|
|
|
unit mm
|
2010-10-12 18:32:15 +03:00
|
|
|
|
2010-04-27 04:02:24 +03:00
|
|
|
EOF
|
|
|
|
|
|
|
|
###############################################################################
|