| --- RCPTT testcase --- |
| Format-Version: 1.0 |
| Contexts: _Sc-5wCOfEeSYPPiPKofiyA,_vTvCoCOfEeSYPPiPKofiyA |
| Element-Name: Repeated Save of Folder Context |
| Element-Type: testcase |
| Element-Version: 3.0 |
| External-Reference: |
| Id: _F7YTACExEeSkpoj5hg4t9Q |
| Runtime-Version: 1.5.0.201406020630 |
| Save-Time: 8/18/14 4:57 PM |
| Testcase-Type: ecl |
| |
| ------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac |
| Content-Type: text/ecl |
| Entry-Name: .content |
| |
| get-view "Test Explorer" | get-tree | select "project/FilledFolderContext" | double-click |
| |
| |
| proc go [val times] { |
| repeat -times $times -command { |
| with [get-editor FilledFolderContext] { |
| with [get-section Folder] { |
| get-tree | select "toCapture/file.txt" |
| get-button Remove | click |
| get-tree | select "toCapture" |
| set-dialog-result File "platform:/resource/external/toCapture/file.txt" |
| get-button "Add Files..." | click |
| } |
| } |
| get-button "Save (M1+S)" | click |
| } |
| } |
| |
| go 10 |
| global [val start [get-memory-usage]] |
| go 100 |
| global [val stop [get-memory-usage]] |
| |
| trace $start |
| trace $stop |
| lt $stop [plus $start 2000000] | verify-true |
| ------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac-- |
