~ubuntu-branches/ubuntu/utopic/castle-game-engine/utopic

« back to all changes in this revision

Viewing changes to tests/testscenecore.pas

  • Committer: Package Import Robot
  • Author(s): Paul Gevers
  • Date: 2013-09-08 21:18:46 UTC
  • mfrom: (1.1.1)
  • Revision ID: package-import@ubuntu.com-20130908211846-zzo3xbeb11fn1vil
Tags: 4.1.1-1
* New upstream release
  - Drop all patches, applied upstream
  - Add fp-units-net to Build-depends
* Add myself to uploaders
* Reorganize d/rules

Show diffs side-by-side

added added

removed removed

Lines of Context:
30
30
begin
31
31
  Scene := TCastleSceneCore.Create(nil);
32
32
  try
33
 
    Scene.Load('data' + PathDelim + 'model_manifold.wrl');
 
33
    Scene.Load('data/model_manifold.wrl');
34
34
    Assert(Scene.BorderEdges.Count = 0);
35
35
  finally FreeAndNil(Scene) end;
36
36
end;
86
86
  CheckIteratorSpeed('../../demo_models/x3d/switches_and_transforms.x3dv');
87
87
  CheckIteratorSpeed('../../demo_models/x3d/key_sensor.x3dv');
88
88
 
89
 
  CheckIteratorSpeed('data' + PathDelim + 'switches_and_transforms_2.x3dv');
90
 
  CheckIteratorSpeed('data' + PathDelim + 'key_sensor_2.x3dv');
 
89
  CheckIteratorSpeed('data/switches_and_transforms_2.x3dv');
 
90
  CheckIteratorSpeed('data/key_sensor_2.x3dv');
91
91
 
92
92
  CheckIteratorSpeed('/home/michalis/sources/rrtankticks2/rrtankticks3/rrtt.wrl',
93
93
    10); { smaller TestCount, as it's quite slow }
137
137
  CheckIterator('../../demo_models/x3d/key_sensor.x3dv');
138
138
  {$endif CASTLE_ENGINE_TRUNK_AVAILABLE}
139
139
 
140
 
  CheckIterator('data' + PathDelim + 'switches_and_transforms_2.x3dv');
141
 
  CheckIterator('data' + PathDelim + 'key_sensor_2.x3dv');
142
 
  CheckIterator('data' + PathDelim + 'extrusion_empty_spine.x3dv');
143
 
  CheckIterator('data' + PathDelim + 'extrusion_empty_spine_concave.x3dv');
144
 
  CheckIterator('data' + PathDelim + 'extrusion_empty_spine_smooth.x3dv');
 
140
  CheckIterator('data/switches_and_transforms_2.x3dv');
 
141
  CheckIterator('data/key_sensor_2.x3dv');
 
142
  CheckIterator('data/extrusion_empty_spine.x3dv');
 
143
  CheckIterator('data/extrusion_empty_spine_concave.x3dv');
 
144
  CheckIterator('data/extrusion_empty_spine_smooth.x3dv');
145
145
end;
146
146
 
147
147
procedure TTestSceneCore.TestFind;
165
165
      Assert(false, 'Should fail with EX3DNotFound');
166
166
    except on EX3DNotFound do ; end;
167
167
 
168
 
    Scene.FileName := 'data' + PathDelim + 'switches_and_transforms_2.x3dv';
 
168
    Scene.URL := 'data/switches_and_transforms_2.x3dv';
169
169
    Scene.Node('Left');
170
170
    Scene.Field('Left', 'translation');
171
171
    Scene.Event('Left', 'addChildren');