Artifact
23969b59c2fc4dfb9d1b4a5865ae45dfa8bfa60b
File
commonstructs
— part of check-in
[5e13bdcb3a]
at
2013-03-11 15:17:03
on branch trunk
— Release v1.5302 merged from development
(user:
mrwellan
size: 366)
[more...]
0000: 0a 54 68 65 20 64 61 74 61 62 61 73 65 20 6b 65 .The database ke
0010: 79 73 2c 20 72 75 6e 73 20 61 72 65 20 69 6e 64 ys, runs are ind
0020: 65 78 65 64 20 6f 6e 20 74 68 69 73 0a 6b 65 79 exed on this.key
0030: 73 3a 20 28 64 62 3a 67 65 74 2d 6b 65 79 73 20 s: (db:get-keys
0040: 23 66 29 20 3d 3e 0a 0a 20 20 20 20 20 20 28 23 #f) =>.. (#
0050: 28 22 4f 53 22 20 20 22 54 45 58 54 22 29 20 0a ("OS" "TEXT") .
0060: 20 20 20 20 20 20 20 23 28 22 46 53 22 20 20 22 #("FS" "
0070: 54 45 58 54 22 29 20 0a 20 20 20 20 20 20 20 23 TEXT") . #
0080: 28 22 54 41 47 22 20 22 54 45 58 54 22 29 29 0a ("TAG" "TEXT")).
0090: 0a 6b 65 79 76 61 6c 6c 73 74 3a 20 28 6b 65 79 .keyvallst: (key
00a0: 73 3a 74 61 72 67 65 74 2d 3e 6b 65 79 76 61 6c s:target->keyval
00b0: 20 6b 65 79 73 20 22 75 62 75 6e 74 75 2f 6e 66 keys "ubuntu/nf
00c0: 73 2f 6e 6f 6e 65 22 29 0a 0a 20 20 20 20 20 20 s/none")..
00d0: 28 28 22 4f 53 22 20 20 22 75 62 75 6e 74 75 22 (("OS" "ubuntu"
00e0: 29 0a 20 20 20 20 20 20 20 28 22 46 53 22 20 20 ). ("FS"
00f0: 22 6e 66 73 22 29 0a 20 20 20 20 20 20 20 28 22 "nfs"). ("
0100: 54 41 47 22 20 22 6e 6f 6e 65 22 29 29 0a 0a 6b TAG" "none"))..k
0110: 65 79 76 61 6c 73 3a 20 28 64 62 3a 67 65 74 2d eyvals: (db:get-
0120: 6b 65 79 2d 76 61 6c 73 20 23 66 20 33 29 20 3b key-vals #f 3) ;
0130: 3b 20 67 65 74 20 74 68 65 20 6b 65 79 20 76 61 ; get the key va
0140: 6c 73 20 66 6f 72 20 72 75 6e 20 23 33 0a 0a 20 ls for run #3..
0150: 20 20 20 20 20 28 22 75 62 75 6e 74 75 22 20 22 ("ubuntu" "
0160: 6e 66 73 22 20 22 6e 6f 6e 65 22 29 0a 0a nfs" "none")..