Coverage report: /home/ellis/comp/core/ffi/tree-sitter/pkg.lisp

Kind	Covered	All	%
expression	2	4	50.0
branch	0	0	nil

Key

Not instrumented

Conditionalized out

Executed

Not executed

Both branches taken

One branch taken

Neither branch taken

1

;;; ffi/tree-sitter/pkg.lisp --- Tree-sitter FFI

2

3

;; Tree-sitter FFI for Lisp

4

5

;; Tree-sitter consists of the base library, which you can load using

6

;; the LOAD-TREE-SITTER function, and the language parsers.

7

8

;; The language parser shared libraries should ALWAYS be located in

9

;; /usr/local/lib/ and be prefixed with 'lib' like so:

10

;; '/usr/local/lib/libtree-sitter-json.so'. Static libraries are not

11

;; supported.

12

13

;; The language parsers have associated json files which should ALWAYS

14

;; be stored in subdirectories of /usr/local/share/tree-sitter/ like

15

;; so: '/usr/local/share/tree-sitter/json/grammar.json'.

16

17

;;; Code:

18

(defpackage :tree-sitter

19

(:use :cl :std :sb-alien :std/alien)

20

(:export

21

:load-tree-sitter

22

:load-tree-sitter-alien

23

:tree-sitter-language-files

24

:*ts-langs*

25

:list-ts-langs

26

:*tree-sitter-language-directory*

27

:ts-state-id

28

:ts-symbol

29

:ts-field-id

30

:ts-language

31

:ts-parser

32

:ts-tree

33

:ts-query

34

:ts-query-cursor

35

:ts-query-error

36

:ts-lookahead-iterator

37

:ts-point

38

:ts-logger

39

:ts-node

40

:ts-tree-cursor

41

:ts-parser-new

42

:ts-parser-delete

43

:ts-parser-reset

44

:ts-parser-logger

45

:ts-parser-set-logger

46

:ts-parser-set-language

47

:ts-parser-language

48

:ts-parser-parse

49

:ts-parser-parse-string

50

:ts-parser-print-dot-graphs

51

:ts-tree-copy

52

:ts-tree-delete

53

:ts-tree-language

54

:ts-tree-edit

55

:ts-tree-print-dot-graph

56

:ts-node-type

57

:ts-node-symbol

58

:ts-node-language

59

:ts-node-grammar-type

60

:ts-node-grammar-symbol

61

:ts-node-start-byte

62

:ts-node-start-point

63

:ts-node-end-byte

64

:ts-node-end-point

65

:ts-node-string

66

:ts-node-is-null

67

:ts-node-eq

68

:ts-node-named-child

69

:ts-tree-cursor-new-pointer

70

:ts-tree-cursor-delete

71

:ts-tree-root-node

72

:ts-language-version

73

:ts-language-symbol-name

74

:ts-language-symbol-count

75

:ts-language-field-count

76

:ts-tree-cursor-current-field-name

77

:ts-tree-cursor-goto-next-sibling

78

:ts-tree-cursor-goto-parent

79

:ts-tree-cursor-goto-first-child

80

:ts-query-new

81

:ts-query-delete

82

:ts-tree-root-node-pointer

83

:ts-node-is-named-pointer

84

:ts-tree-cursor-current-node-pointer

85

:ts-node-start-point-pointer

86

:ts-node-end-point-pointer

87

:ts-node-type-pointer

88

:with-ts-parser

89

:with-ts-lang

90

:language-module

91

:parse-string-with-language

92

:tree-sitter-error

93

:with-ts-node

94

:parse-string

95

:with-ts-cursor

96

:convert-foreign-tree-to-list

97

:ts-language-next-state

98

:ts-language-field-id-for-name

99

:ts-language-field-name-for-id

100

:ts-language-symbol-type

101

:with-ts-query

102

:ts-query-cursor-delete

103

:with-ts-query-cursor

104

:check-ts-query-error))

105

106

(in-package :tree-sitter)

107

108

(define-alien-loader tree-sitter)

109

(define-alien-loader tree-sitter-alien)