From 53aa19a9164355acd2c1b41db1d83da5293fe11d Mon Sep 17 00:00:00 2001 From: Calvin Rose Date: Wed, 18 Nov 2020 10:53:36 -0600 Subject: Several changes to move pipe creation back into ev.c --- tools/patch-header.janet | 11 +---------- 1 file changed, 1 insertion(+), 10 deletions(-) (limited to 'tools') diff --git a/tools/patch-header.janet b/tools/patch-header.janet index bbc86653..af44aba0 100644 --- a/tools/patch-header.janet +++ b/tools/patch-header.janet @@ -1,12 +1,3 @@ # Patch janet.h - (def [_ janeth janetconf output] (dyn :args)) - -(def- replace-peg - (peg/compile - ~(% (* '(to `#include "janetconf.h"`) - (constant ,(slurp janetconf)) - (thru `#include "janetconf.h"`) - '(any 1))))) - -(spit output (first (peg/match replace-peg (slurp janeth)))) +(spit output (peg/replace `#include "janetconf.h"` (slurp janetconf) (slurp janeth))) -- cgit v1.2.3