From d325d2226cf55b63037dc62cefb7fa952d770d50 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= <john@ankarstrom.se>
Date: Sun, 31 Jan 2021 14:14:05 +0000
Subject: Bind $home/bin/rc to rc/ instead of ./

---
 def | 45 ---------------------------------------------
 1 file changed, 45 deletions(-)
 delete mode 100755 def

(limited to 'def')

diff --git a/def b/def
deleted file mode 100755
index 09a3f0c..0000000
--- a/def
+++ /dev/null
@@ -1,45 +0,0 @@
-#!/bin/rc -e
-
-# def -- find function definition
-
-flagfmt=a
-args='name [dir]'
-if(! ifs=() eval `{aux/getflags $*} || ! ~ $#* 1 2 3){
-	echo usage: $0 name [dir] >[1=2]
-	exit usage
-}
-
-name=$1
-if(~ $#* 2) wdir=$2
-if not wdir=`{pwd}
-
-files=$wdir^/*.[ch]
-if(~ $files $wdir^/'*.[ch]'){
-	echo error: no c/h files found >[1=2]
-	exit 'not found'
-}
-
-# ansi definition
-if(~ $flaga 1){
-	r=`{
-		echo 'X ,x/[\n 	]\**'^$name^'\(.*\)([ 	]*\/\*.*\*\/)?\n{/-+=' |
-		sam -d $files >[2=1] |
-		awk -F'[ ;]' '
-			/^ -\. / { file = $3; next }
-			/^ -  / { file = $4; next }
-			{ print file ":" $1; exit }
-	'}
-}
-
-# style(1) definition
-if not{
-	r=`{grep -n '^'^$name^'\(' $files | awk -F: '{print $1 ":" $2; exit}'}
-}
-
-# success
-if(! ~ $r '')
-	echo $r
-
-# try to find macro instead
-if not
-	grep -n '^#define[ 	]'^$name^'\(' $files | awk -F: '{print $1 ":" $2; exit}'
-- 
cgit v1.2.3