From 0593c87131d57a694349febe74abd2ba363c9d2b Mon Sep 17 00:00:00 2001 From: Miro Jurisic Date: Fri, 28 Aug 1998 17:05:37 +0000 Subject: [PATCH] Added MPW fragment aliasing script git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@10890 dc483132-0cff-0310-8789-dd5450dbe970 --- src/mac/FragmentAlias.mpw | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) create mode 100644 src/mac/FragmentAlias.mpw diff --git a/src/mac/FragmentAlias.mpw b/src/mac/FragmentAlias.mpw new file mode 100644 index 000000000..d09a2132f --- /dev/null +++ b/src/mac/FragmentAlias.mpw @@ -0,0 +1,24 @@ +# StreamEdit script to find a GSSLibrary fragment in a derez output and +# create an alias to it + +# If a line matches "/* [number] */", it's the first line of a cfrg array element. +# copy the next 11 lines, and if the last one matches "GSSLibrary", print them out with +# a different fragment name + +¥ + Print "#include ¶"CodeFragments.r¶"" + +/¶/¶* ¶[[0-9]*¶] ¶*¶// + Set FragEntry "" + +/GSSLibrary/ + Print "¶t¶t¶"MIT_¥GSSLib¶",¶t¶t" + Print FragEntry + +/K5Library/ + Print "¶t¶t¶"MIT_¥Kerberos5Lib¶",¶t¶t" + Print FragEntry + +/Å/ + Set -a FragEntry . + Set -a FragEntry "¶n" -- 2.26.2