Eskil

Check-in [c99cfccaba]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Test subversion revision parsing
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: c99cfccababde34af0feff3b818cf16c5c18d19e
User & Date: peter 2009-01-07 23:10:59.000
Context
2009-01-07
23:16
Release 2.4 check-in: 9d2ca9030d user: peter tags: trunk
23:10
Test subversion revision parsing check-in: c99cfccaba user: peter tags: trunk
23:09
Better interpretation of negative SVN versions check-in: 3c929eb1df user: peter tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to tests/rev.test.
︙︙
27
28
29
30
31
32
33























34
35
36
37
38
39
40

            # cvs -z3 update -p ?-r rev? $filename > $outfile
            return
        }
        co {
            # co -p$rev $filename > $outfile
            return
        }























        default {
            eval _stub_exec $args
        }
    }
}

test rev-1.1 {








>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>








27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63

            # cvs -z3 update -p ?-r rev? $filename > $outfile
            return
        }
        co {
            # co -p$rev $filename > $outfile
            return
        }
        svn {
            switch -- [lindex $args 1] {
                info {
                    return {
                        Last Changed Author: pspjuth
                        Last Changed Rev: 158
                        Last Changed Date: 2008-03-04 07:39:43 +0100
                    }
                }
                log {
                    return {
                        ------------------------------------------
                        r122 | pspjuth | 2008-02-19 13:58:14 +0100
                        ------------------------------------------
                        r117 | pspjuth | 2008-02-15 09:07:16 +0100
                        ------------------------------------------
                        r115 | pspjuth | 2008-02-14 11:11:07 +0100
                        ------------------------------------------
                    }
                }
            }
            return
        }
        default {
            eval _stub_exec $args
        }
    }
}

test rev-1.1 {
︙︙
244
245
246
247
248
249
250













    if {!$apa} {
        file delete .bzr
    }
    set res
} -cleanup {
    tcltest::removeFile {} _rev2_11
} -result {BZR}




















>
>
>
>
>
>
>
>
>
>
>
>

267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285

    if {!$apa} {
        file delete .bzr
    }
    set res
} -cleanup {
    tcltest::removeFile {} _rev2_11
} -result {BZR}

test rev-3.1 {
    Subversion revisions
} -body {
    eskil::rev::SVN::ParseRevs filename -1
} -result {157}

test rev-3.2 {
    Subversion revisions
} -body {
    eskil::rev::SVN::ParseRevs filename -2
} -result {115}