Import guile-1.8 as multiple upstream tarball component

[lilypond.git] / guile18 / lang / elisp / primitives / buffers.scm

diff --git a/guile18/lang/elisp/primitives/buffers.scm b/guile18/lang/elisp/primitives/buffers.scm
new file mode 100644 (file)
index 0000000..756d4be
--- /dev/null
+++ b/guile18/lang/elisp/primitives/buffers.scm
@@ -0,0 +1,16 @@
+(define-module (lang elisp primitives buffers)
+  #:use-module (ice-9 optargs)
+  #:use-module (lang elisp internals fset))
+
+(fset 'buffer-disable-undo
+      (lambda* (#:optional buffer)
+       'unimplemented))
+
+(fset 're-search-forward
+      (lambda* (regexp #:optional bound noerror count)
+       'unimplemented))
+
+(fset 're-search-backward
+      (lambda* (regexp #:optional bound noerror count)
+       'unimplemented))
+