Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
gendl
gendl
Commits
02c3d34b
Commit
02c3d34b
authored
Jan 20, 2014
by
Dave Cooper
Browse files
added some regression tests, updated boolean garbage collection.
parent
b5e6ac65
Changes
4
Hide whitespace changes
Inline
Side-by-side
regression/data/round-trip.stp
View file @
02c3d34b
ISO-10303-21;
HEADER;
FILE_DESCRIPTION ((), '1');
FILE_NAME ('/Users/dcooper8/tmp/G
3355731
', '201
3-1
1-
1
9T
00:02:38
', ('Unknown'), ('Unknown'), 'HarmonyWare STEP v1.9.13', 'HarmonyWare Translators', '');
FILE_NAME ('/Users/dcooper8/tmp/G
412379
', '201
4-0
1-
0
9T
21:26:23
', ('Unknown'), ('Unknown'), 'HarmonyWare STEP v1.9.13', 'HarmonyWare Translators', '');
FILE_SCHEMA (('CONFIG_CONTROL_DESIGN'));
ENDSEC;
...
...
@@ -26614,9 +26614,9 @@ DATA;
#265850 = PRODUCT_DEFINITION_FORMATION_WITH_SPECIFIED_SOURCE ('', '', #265780, .NOT_KNOWN.);
#265860 = APPROVAL_STATUS ('approved');
#265870 = APPROVAL (#265860, '');
#265880 = CALENDAR_DATE (201
3
,
1
9,
1
1);
#265880 = CALENDAR_DATE (201
4
, 9, 1);
#265890 = COORDINATED_UNIVERSAL_TIME_OFFSET (0, $, .AHEAD.);
#265900 = LOCAL_TIME (
0
, 2, 3
8
., #265890);
#265900 = LOCAL_TIME (
21
, 2
6
,
2
3., #265890);
#265910 = DATE_AND_TIME (#265880, #265900);
#265920 = APPROVAL_DATE_TIME (#265910, #265870);
#265930 = APPROVAL_ROLE ('');
...
...
@@ -26639,9 +26639,9 @@ DATA;
#266100 = SECURITY_CLASSIFICATION ('', '', #266090);
#266110 = APPROVAL_STATUS ('approved');
#266120 = APPROVAL (#266110, '');
#266130 = CALENDAR_DATE (201
3
,
1
9,
1
1);
#266130 = CALENDAR_DATE (201
4
, 9, 1);
#266140 = COORDINATED_UNIVERSAL_TIME_OFFSET (0, $, .AHEAD.);
#266150 = LOCAL_TIME (
0
, 2, 3
8
., #266140);
#266150 = LOCAL_TIME (
21
, 2
6
,
2
3., #266140);
#266160 = DATE_AND_TIME (#266130, #266150);
#266170 = APPROVAL_DATE_TIME (#266160, #266120);
#266180 = APPROVAL_ROLE ('');
...
...
@@ -26651,9 +26651,9 @@ DATA;
#266220 = APPROVAL_PERSON_ORGANIZATION (#266210, #266120, #266180);
#266230 = CC_DESIGN_APPROVAL (#266120, (#266100));
#266240 = DATE_TIME_ROLE ('classification_date');
#266250 = CALENDAR_DATE (201
3
,
1
9,
1
1);
#266250 = CALENDAR_DATE (201
4
, 9, 1);
#266260 = COORDINATED_UNIVERSAL_TIME_OFFSET (0, $, .AHEAD.);
#266270 = LOCAL_TIME (
0
, 2, 3
8
., #266260);
#266270 = LOCAL_TIME (
21
, 2
6
,
2
3., #266260);
#266280 = DATE_AND_TIME (#266250, #266270);
#266290 = CC_DESIGN_DATE_AND_TIME_ASSIGNMENT (#266280, #266240, (#266100));
#266300 = PERSON_AND_ORGANIZATION_ROLE ('classification_officer');
...
...
@@ -26666,9 +26666,9 @@ DATA;
#266370 = PRODUCT_DEFINITION ('', '', #265850, #266360);
#266380 = APPROVAL_STATUS ('approved');
#266390 = APPROVAL (#266380, '');
#266400 = CALENDAR_DATE (201
3
,
1
9,
1
1);
#266400 = CALENDAR_DATE (201
4
, 9, 1);
#266410 = COORDINATED_UNIVERSAL_TIME_OFFSET (0, $, .AHEAD.);
#266420 = LOCAL_TIME (
0
, 2, 3
8
., #266410);
#266420 = LOCAL_TIME (
21
, 2
6
,
2
3., #266410);
#266430 = DATE_AND_TIME (#266400, #266420);
#266440 = APPROVAL_DATE_TIME (#266430, #266390);
#266450 = APPROVAL_ROLE ('');
...
...
@@ -26678,9 +26678,9 @@ DATA;
#266490 = APPROVAL_PERSON_ORGANIZATION (#266480, #266390, #266450);
#266500 = CC_DESIGN_APPROVAL (#266390, (#266370));
#266510 = DATE_TIME_ROLE ('creation_date');
#266520 = CALENDAR_DATE (201
3
,
1
9,
1
1);
#266520 = CALENDAR_DATE (201
4
, 9, 1);
#266530 = COORDINATED_UNIVERSAL_TIME_OFFSET (0, $, .AHEAD.);
#266540 = LOCAL_TIME (
0
, 2, 3
8
., #266530);
#266540 = LOCAL_TIME (
21
, 2
6
,
2
3., #266530);
#266550 = DATE_AND_TIME (#266520, #266540);
#266560 = CC_DESIGN_DATE_AND_TIME_ASSIGNMENT (#266550, #266510, (#266370));
#266570 = PERSON_AND_ORGANIZATION_ROLE ('creator');
regression/utils/source/functions.lisp
View file @
02c3d34b
...
...
@@ -185,7 +185,7 @@
(
output-stream
*trace-output*
))
(
dotimes
(
n
warmup-runs
)
(
the-object
(
make-object
(
intern
symbol
:gdl-lift-tests
))
regression-test-data
))
(
the-object
(
make-object
(
glisp:
intern
symbol
:gdl-lift-tests
))
regression-test-data
))
(
multiple-value-bind
(
mem1-prev
mem2-prev
)
(
glisp:get-mem-info
)
(
let
((
mem1-orig
mem1-prev
)
(
mem2-orig
mem2-prev
))
...
...
surf/source/boolean.lisp
View file @
02c3d34b
...
...
@@ -238,6 +238,7 @@ This occured in:
:manifold?
(
the
manifold?
))))
(
brep-assert-valid
*geometry-kernel*
result
:warn?
(
not
(
the
error-on-invalid?
)))
result
)))))
...
...
surf/source/cone-solid.lisp
View file @
02c3d34b
...
...
@@ -48,7 +48,7 @@ from brep and cylinder"
:hidden-objects
((
outer-cylinder
:type
(
if
(
and
(
the
:radius-1
)
(
the
:radius-2
))
'simple-cone-solid
'simple-cylinder-solid
)
:pass-down
(
radius
radius-1
radius-2
arc
))
:pass-down
(
radius
radius-1
radius-2
arc
brep-tolerance
))
(
inner-cylinder
:type
(
cond
((
and
(
the
:inner-radius-1
)
(
the
:inner-radius-2
))
'simple-cone-solid
)
...
...
@@ -57,7 +57,7 @@ from brep and cylinder"
:radius
(
the
:inner-radius
)
:radius-1
(
the
:inner-radius-1
)
:radius-2
(
the
:inner-radius-2
)
:pass-down
(
arc
))
:pass-down
(
arc
brep-tolerance
))
(
subtract
:type
(
if
(
typep
(
the
inner-cylinder
)
'null-part
)
'null-part
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment