File tree Expand file tree Collapse file tree 1 file changed +6
-6
lines changed Expand file tree Collapse file tree 1 file changed +6
-6
lines changed Original file line number Diff line number Diff line change 208
208
(gethash " bar" parsed-hash))))
209
209
210
210
(deftest :yason " parse-ordering-alist"
211
- (setf yason :*parse-object-as* :alist )
212
- (test-equal ' ((" foo" . 0 ) (" bar" . 1 ) (" foo" . 2 ))
213
- (yason :parse " {\" foo\" :0,\" bar\" :1,\" foo\" :2}" )))
211
+ (let (( yason :*parse-object-as* :alist ) )
212
+ (test-equal ' ((" foo" . 0 ) (" bar" . 1 ) (" foo" . 2 ))
213
+ (yason :parse " {\" foo\" :0,\" bar\" :1,\" foo\" :2}" ) )))
214
214
215
215
(deftest :yason " parse-ordering-plist"
216
- (setf yason :*parse-object-as* :plist )
217
- (test-equal ' (" foo" 0 " bar" 1 " foo" 2 )
218
- (yason :parse " {\" foo\" :0,\" bar\" :1,\" foo\" :2}" )))
216
+ (let (( yason :*parse-object-as* :plist ) )
217
+ (test-equal ' (" foo" 0 " bar" 1 " foo" 2 )
218
+ (yason :parse " {\" foo\" :0,\" bar\" :1,\" foo\" :2}" ) )))
You can’t perform that action at this time.
0 commit comments