summaryrefslogtreecommitdiff
path: root/debian/patches/0005-bootshell-add-facility-to-load-embedded-scripts.patch
diff options
context:
space:
mode:
Diffstat (limited to 'debian/patches/0005-bootshell-add-facility-to-load-embedded-scripts.patch')
-rw-r--r--debian/patches/0005-bootshell-add-facility-to-load-embedded-scripts.patch45
1 files changed, 0 insertions, 45 deletions
diff --git a/debian/patches/0005-bootshell-add-facility-to-load-embedded-scripts.patch b/debian/patches/0005-bootshell-add-facility-to-load-embedded-scripts.patch
deleted file mode 100644
index de56dfcd..00000000
--- a/debian/patches/0005-bootshell-add-facility-to-load-embedded-scripts.patch
+++ /dev/null
@@ -1,45 +0,0 @@
-From 1ff147848b9490fbada79e99d196767c9f6f66a1 Mon Sep 17 00:00:00 2001
-From: Justus Winter <4winter@informatik.uni-hamburg.de>
-Date: Sat, 24 Jan 2015 01:54:52 +0100
-Subject: [PATCH hurd 5/7] bootshell: add facility to load embedded scripts
-
-* bootshell/scheme.c (scheme_load_mem): New function.
----
- bootshell/scheme.c | 24 ++++++++++++++++++++++++
- 1 file changed, 24 insertions(+)
-
-diff --git a/bootshell/scheme.c b/bootshell/scheme.c
-index 99f9106..94c2307 100644
---- a/bootshell/scheme.c
-+++ b/bootshell/scheme.c
-@@ -5049,3 +5049,27 @@ Local variables:
- c-file-style: "k&r"
- End:
- */
-+
-+/* Like scheme_load_string, but does not rely on a terminating zero. */
-+void
-+scheme_load_mem (scheme *sc, const char *cmd_start, const char *cmd_end)
-+{
-+ dump_stack_reset(sc);
-+ sc->envir = sc->global_env;
-+ sc->file_i=0;
-+ sc->load_stack[0].kind=port_input|port_string;
-+ /* This func respects const */
-+ sc->load_stack[0].rep.string.start=(char*) cmd_start;
-+ sc->load_stack[0].rep.string.past_the_end=(char*) cmd_end;
-+ sc->load_stack[0].rep.string.curr=(char*) cmd_start;
-+ sc->loadport=mk_port(sc,sc->load_stack);
-+ sc->retcode=0;
-+ sc->interactive_repl=0;
-+ sc->inport=sc->loadport;
-+ sc->args = mk_integer(sc,sc->file_i);
-+ Eval_Cycle(sc, OP_T0LVL);
-+ typeflag(sc->loadport)=T_ATOM;
-+ if(sc->retcode==0) {
-+ sc->retcode=sc->nesting!=0;
-+ }
-+}
---
-2.1.4
-