golems / motion-grammar-kit Goto Github PK

I haven't installed ach. When I run
./configure -without-ach
it gives
configure: CONFIGURATION SUMMARY configure: ===================== configure: COMMONLISP: sbcl configure: USE ACH: no
But when I run make it is giving error In file included from libmotgram/motgram.c:62:0: ./include/motgram.h:94:14: warning: 'mg_supervisor_allow' defined but not used [-Wunused-function] static _Bool mg_supervisor_allow ( mg_supervisor_table_t *table, ^ libtool: compile: gcc -std=gnu99 -DHAVE_CONFIG_H -I. -I./include -Wc++-compat -Wwrite-strings -Wshadow -Wfloat-equal -Wpointer-arith -Wconversion -Wextra -g -O2 -Wall -MT libmotgram/motgram.lo -MD -MP -MF libmotgram/.deps/motgram.Tpo -c libmotgram/motgram.c -o libmotgram/motgram.o >/dev/null 2>&1 /bin/bash ./libtool --tag=CC --mode=link gcc -std=gnu99 -Wc++-compat -Wwrite-strings -Wshadow -Wfloat-equal -Wpointer-arith -Wconversion -Wextra -g -O2 -Wall -o libmotgram.la -rpath /usr/local/lib libmotgram/motgram.lo -lach libtool: link: gcc -shared -fPIC -DPIC libmotgram/.libs/motgram.o -lach -O2 -Wl,-soname -Wl,libmotgram.so.0 -o .libs/libmotgram.so.0.0.0 /usr/bin/ld: cannot find -lach collect2: error: ld returned 1 exit status make[1]: *** [libmotgram.la] Error 1 make[1]: Leaving directory /home/pradip/motion-grammar-kit'
make: *** [all] Error 2
`

A list of commands necessary to run the tests would be nice. Preferably both running them from slime and from the sbcl command line.

Hi,

I am collecting information for my pet project and would like to know more about the regex implementation in this library.

Could you please provide some background/explanations if this regex engine is intended to be used to process strings/sequences/vectors, etc. how is it used (API) what are its features?

Thanks,
Victor

Hello. I'm not entirely sure how to use the trie in src/util.lisp. Is it correct that nil is the "empty trie"? I mean does this definition make sense?

(defun trie-multiple-insert (lists)
  (fold #'trie-insert nil lists))

Using the trie I get this crash, but I'm not sure if I'm using it wrong or if the implementation is buggy.

MG> (setf my-trie (trie-insert nil '(a)))
; 
; caught WARNING:
;   undefined variable: MY-TRIE
; 
; compilation unit finished
;   Undefined variable:
;     MY-TRIE
;   caught 1 WARNING condition
(((A) NIL))
MG> my-trie 
(((A) NIL))
MG> (TRIE-INSERT my-trie '(a b)) 
error while parsing arguments to DESTRUCTURING-BIND:
  invalid number of elements in
    ()
  to satisfy lambda list
    (PREFIX &REST SUFFIXES):
  at least 1 expected, but 0 found
   [Condition of type SB-KERNEL::ARG-COUNT-ERROR]
; Evaluation aborted on NIL

I'm not sure how to use fold-fa-edges. I thought it would be something like (fold-fa-edges (lambda (acc edge) (+ c (cadr edge))) 0 my-fa), but that doesn't work for me. Might the implementation be wrong?

I changed

(defun fold-fa-edges (function initial-value fa)
  (fold (lambda (v e) (apply function v e))
        initial-value (fa-edges fa)))

to

(defun fold-fa-edges (function initial-value fa)
  (fold function
        initial-value (fa-edges fa)))

and then I got the behavior I expected.