abc.lisp.native

[ []
, [ ( NormalTok , "(" )
  , ( KeywordTok , "defun" )
  , ( FunctionTok , " word-possible-p " )
  , ( NormalTok , "(word blocks)" )
  ]
, [ ( NormalTok , "  (" )
  , ( KeywordTok , "cond" )
  , ( NormalTok , " " )
  ]
, [ ( NormalTok , "    ((" )
  , ( OperatorTok , "=" )
  , ( NormalTok , " (" )
  , ( KeywordTok , "length" )
  , ( NormalTok , " word) " )
  , ( DecValTok , "0" )
  , ( NormalTok , ") " )
  , ( KeywordTok , "t" )
  , ( NormalTok , ")" )
  ]
, [ ( NormalTok , "    ((" )
  , ( KeywordTok , "null" )
  , ( NormalTok , " blocks) " )
  , ( KeywordTok , "nil" )
  , ( NormalTok , ")" )
  ]
, [ ( NormalTok , "    (" )
  , ( KeywordTok , "t" )
  , ( NormalTok , " (" )
  , ( KeywordTok , "let*" )
  , ( NormalTok , " " )
  ]
, [ ( NormalTok , "         ((c (" )
  , ( KeywordTok , "aref" )
  , ( NormalTok , " word " )
  , ( DecValTok , "0" )
  , ( NormalTok , "))" )
  ]
, [ ( NormalTok , "          (bs (" )
  , ( KeywordTok , "remove-if-not" )
  , ( NormalTok , " " )
  , ( OperatorTok , "#'" )
  , ( NormalTok , "(" )
  , ( KeywordTok , "lambda" )
  , ( NormalTok , " (b) " )
  ]
, [ ( NormalTok , "                                 (" )
  , ( KeywordTok , "find" )
  , ( NormalTok , " c b " )
  , ( BuiltInTok , ":test" )
  , ( NormalTok , " " )
  , ( OperatorTok , "#'" )
  , ( NormalTok , "char-equal))" )
  ]
, [ ( NormalTok , "                             blocks)))" ) ]
, [ ( NormalTok , "         (" )
  , ( KeywordTok , "some" )
  , ( NormalTok , " " )
  , ( OperatorTok , "#'" )
  , ( NormalTok , "identity " )
  ]
, [ ( NormalTok , "               (" )
  , ( KeywordTok , "loop" )
  , ( NormalTok , " for b in bs" )
  ]
, [ ( NormalTok , "                     collect (word-possible-p" )
  ]
, [ ( NormalTok , "                               (" )
  , ( KeywordTok , "subseq" )
  , ( NormalTok , " word " )
  , ( DecValTok , "1" )
  , ( NormalTok , ")" )
  ]
, [ ( NormalTok , "                               (" )
  , ( KeywordTok , "remove" )
  , ( NormalTok , " b blocks))))))))" )
  ]
]