Elisp一天一函数—— json-read-file

2019-01-28  本文已影响0人  m2fox
{
  "name": "Tom",
  "age": 20,
  "score": {
    "English": 100,
    "Math": 85.5
  }
}

写下面的代码读取上面的文件:

(setq json-alist (json-read-file "d:/info.json"))
(print json-alist)
(print (alist-get 'name json-alist))
(print (alist-get 'Math (alist-get 'score json-alist)))

运行上面的代码,输出:

((name . "Tom") (age . 20) (score (English . 100) (Math . 85.5)))
"Tom"
85.5
上一篇 下一篇

猜你喜欢

热点阅读