From 50cbda38c3c5c07c0516b3a284aa8d16d36fd146 Mon Sep 17 00:00:00 2001
From: Robert Sprowson <rsprowson@gitlab.riscosopen.org>
Date: Sat, 21 Aug 2010 08:31:14 +0000
Subject: [PATCH] Put some unused files in the attic, unused in 13 years. Not
tagged.
---
Doc/SprExtend2 | 36 --------------
c/repeat | 130 -------------------------------------------------
w/ZapS-PSS,ffb | Bin 1270 -> 0 bytes
w/ZapS-ROJ,ffb | Bin 1261 -> 0 bytes
w/ZapS-TD,ffb | Bin 1269 -> 0 bytes
5 files changed, 166 deletions(-)
delete mode 100644 Doc/SprExtend2
delete mode 100644 c/repeat
delete mode 100644 w/ZapS-PSS,ffb
delete mode 100644 w/ZapS-ROJ,ffb
delete mode 100644 w/ZapS-TD,ffb
diff --git a/Doc/SprExtend2 b/Doc/SprExtend2
deleted file mode 100644
index ebb5ded..0000000
--- a/Doc/SprExtend2
+++ /dev/null
@@ -1,36 +0,0 @@
-Subject: SprExtend2
-Author: David De Vorchik
-History:
- 30-Jan-91 DDeVorchik Created.
- 05-Feb-91 DDeVorchik Extended exit params on read size.
-
-This document covers changes made to SpriteExtend after v0.28, these include
-the following:
-
- * Adding, removing and checking sprite palettes.
-
-
-SpriteReason_CreateRemovePalette
---------------------------------
-
-in: r0 = 37, SpriteReason_CreateRemovePalette (+0 / +256 / +512)
- r1 -> sprite control block
- r2 -> sprite name / -> sprite
- r3 = reason code
- = -1 : read current palette size
- = 0 : remove palette from sprite
- <> 0 : add palette to sprite
-
-out: V=1 => r0 -> error block
- if r3 =-1 on entry then; r3 = size palette (=0 if none), else all preserved.
- r4 -> palette (=0 if none)
- r5 = mode
-
-This call simply adds, removes or returns the size of a palette associated
-with a given sprite.
-
-It should be noted then when output is switched to a sprite and the palette
-is added or removed from it the current display pointers will become invalid
-so you should switch output away, modify the palete and switch output back
-to the sprite.
-
diff --git a/c/repeat b/c/repeat
deleted file mode 100644
index da37117..0000000
--- a/c/repeat
+++ /dev/null
@@ -1,130 +0,0 @@
-/* Copyright 1996 Acorn Computers Ltd
- *
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at
- *
- * http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
- */
-/* c.repeat - simple tool to do a CLI command to each thing in a directory */
-
-#include <string.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <assert.h>
-
-#include "kernel.h"
-#include "swis.h"
-
-#define _ ,
-#define ERROR(message) {printf(message); exit(1);}
-#define SYSERROR ERROR("Error: %s.\n" _ _kernel_last_oserror()->errmess)
-#define CALL(expr) {_kernel_oserror *e_ = (expr); if (e_) ERROR("Error: %s\n" _ e_->errmess)}
-
-#define BOOL int
-#define TRUE 1
-#define FALSE 0
-
-static void enumerate(char *pathname, int include, int include_type, void(*callit)(char*,int))
-/* include&1 -> allow directories
- include&2 -> allow all files
- include&3 -> allow files only of specified type
-*/
-{
- char buffer[512];
- int offset = 0;
- int entrytype;
- int type;
- char namebuf[256];
- char *a;
-
- while (1)
- {
- CALL(_swix(OS_GBPB,_IN(0)+_IN(1)+_IN(2)+_IN(3)+_IN(4)+_IN(5)+_IN(6)+_OUT(4),
- 10, pathname, buffer, 1, offset, 512, 0, &offset))
- if (offset == -1) break;
- entrytype = ((int*)buffer)[4]; /* type of directory entry */
-
- a = buffer + 20; /* ensure that it is well terminated */
- while (*a > ' ') a++;
- *a = 0;
-
- strcpy(namebuf, pathname);
- strcat(namebuf, ".");
- strcat(namebuf, buffer + 20);
-
- if (entrytype == 1) /* it's a file */
- {
- type = (((int*)buffer)[0] >> 8) & 0xfff;
- if (include&2 || (include&3 && type == include_type))
- /* this = make_dir_entry(buffer + 20, type); */
- callit(namebuf, type);
- }
- else if (entrytype == 2) /* it's a directory or application */
- {
- if (include&1) /* this = make_dir_entry(buffer + 20, -1); */ callit(namebuf, -1);
- }
- }
-}
-
-static char *command;
-
-static void obey_it(char *name, int type)
-{
- char a[256];
-
- /* printf("obey_it %s %i\n", name, type); */
- sprintf(a, "%s %s", command, name);
- if (type != -1)
- {
- system(a);
-/* CALL(_swix(OS_CLI, _IN(0), "If \"<Sys$ReturnCode>\"=\"1\" Then Error Error in called program")) */
- CALL(_swix(OS_CLI, _IN(0), "If \"<Sys$ReturnCode>\"=\"1\" Then *Quit"))
- }
- if (type == -1) enumerate(name, 3, 0, obey_it);
-}
-
-int main(int argc, char **argv)
-{
- int arg = 1;
- char *options = 0;
- char *root = 0;
- BOOL loop = FALSE;
- BOOL verbose = FALSE;
-
- command = 0;
- while (argv[arg] != 0 && argv[arg][0] != 0)
- {
- if (argv[arg][0] == '-') options = argv[arg++] + 1;
- else if (root == 0) root = argv[arg++];
- else if (command == 0) command = argv[arg++];
-
- if (options)
- {
- while (*options)
- {
- switch (*options++)
- {
- case 'L': case 'l': loop = TRUE; break;
- case 'V': case 'v': verbose = TRUE; break;
- }
- }
- options = 0;
- }
- }
-
- if (verbose) printf("repeat (%s)\n", __DATE__);
- if (verbose && root != 0) printf("root=%s\n", root);
- if (verbose && command != 0) printf("cmd=%s\n", command);
- if (root == 0 || command == 0) ERROR("Syntax: repeat [-l] <rootdir> <command>\n")
-
- do enumerate(root, 3, 0, obey_it); while (loop);
-
- return 0;
-}
diff --git a/w/ZapS-PSS,ffb b/w/ZapS-PSS,ffb
deleted file mode 100644
index d8e8d221aa2c118d5e43fffd32957ef772034a0d..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001
literal 1270
zcmZuwzi-n(6!t)cgyao%tR5*tkn*DxRH>9om^1~8Dyia>s@*R3vvb0}Gk0f_Ffw;$
zW=3LT=D%QIV`E104)2^FO$8pD_}+KleeZkUxsFpWp(FE|;>p;+!~Oj|@It8sEoOOP
zP-!?Zk?S}cCB3>OobV8Z#s~@#p#n2T@NyQ?&!W<R*R+dE0lTdos9Qj7QK~&SAd=$}
zX0m{c%|J*4g+^lG8e*Oz;55YC02dIFfRr;4B22g$S0^oaTEx;U;bOreM~2Y`MqBb3
z$aozJ%q+z}F2O!yWAZ2M_GB_?u}XMLs-&IH+tTe5ztimn-6n}&ZuCny6Dev93f~r7
zQS+l2u$<(DY(%0{HUX)CB?_r#q?JEW+;EXJK+D)nm_lNEQ9{JEQG7(st~<Es3&@3a
z0C~s+)Vu)vpa##qzz-Tk(<|ZJAHM9L4dL7y47}dZ?*`BxK&Rh3@`rxEM_<R_^)BF*
z-#cmml7BQSoaV}QK~lN(79(pUbr+x=!D@mK6T*J$977)SkQx+8!4iZ-zC$IbFUV14
zT-!No5@{21zl4-$+%QuuUgu+NYBoi8_Djf>OccwkS7R2w0o^(+Oc1gZqlR5nn9)g<
z2!#oGhRSvBJ|q7y=7OBH$Hqz$1L>qc!Yl``WuYiDO<S2km@+-C0^~Ydhb4JHWLEz=
zkr^{n5pfZwMP$oNYs_f2%H~s(PxVc5eGtGNMbRq~dsQB}&h9POdAjMrA$+N=^-y!2
z<K{20>pO4-zhS)yF{7kcIgvSvdjvkMf8X{RP&>F`MC;~5xXTqTL4k_d6j2m=QiY0Q
z1|7SDaM21!CJ1;>S)C&%txJ{%&C?*LaN-)b@_gyHbx1GxrYoG5WE8o@4TO}<5mMHz
zXOty6_rnTDH^5HD^K?cxpqhw`=lu}wYK60)Ag8;6-KjwlK_;Uj#l^WFSGf7s|GtUu
b)7H|ze-KpteEY|?=Q>|$R^K*$x_|xxno^OR
diff --git a/w/ZapS-ROJ,ffb b/w/ZapS-ROJ,ffb
deleted file mode 100644
index 7c2d6f03060669ab8076d53e5564f684d2242d04..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001
literal 1261
zcmZuwF^|(o7<B<cLUMKJO7sz~*hASY2d9-dKsvKz!LUkDynvva*q@yd_KcYsUpACi
zQ(sMe(sk7Q3ko_qY9#mE8*k!`1TLJ|-}~OY?|si<5bU&cpzD>9#lq2Vw{GoIlxm~!
zvZ@=$#?q0?!XP-`;x=ySNT#eTXVj>S4Y>tVRErcp>&lRxp-XB-H%8ZK#{&lI(%{$I
zAUSMlr5mcmij;QLSO$x<l*^KdPg1TONku6Hlv1daX(`>JJ88``0?TeoFV-x2?gSbH
zTIv<)d>cx_ZN&fHlD`(t)qm{mEtkuY=!B27DfY_KvFzSad@!CQ<6Vf~G{!AGRV7<X
zhF>?*VEFlpL=AbVm_u|amZS}d!Z2!1d-+Qvom9n;tj^t17zW#emNIFbk#jh^?cjPY
zf(zRKcqkMNqJ-jPK=+~~PKKbFwDdeaemH%4OwXg)ESen0<AkO&I+#xG$H(z>f~P}@
zCNJo5Jh?w4hJV-<pVY=r0jbh^%b7P4(<SUz&~K1(ApEnfIhDCgF`z0MQ7{$yFE$Eu
zQO%~3*6-Ouq)*5%EtRs8PPp#nSw6P5=2LWWzopvf!idUywGinmvZLAb(Ub9mp?_nz
z!ZDo!!vzdu69$+5gn67x1zY`@xzT8cNc>T5vvsQ*gTU<i%8Jrb*hQC~Ft~iTg#jS*
z;<t(1Lb#4ds<dn}Ul!JKg~b{lP79NEeum|<g!Ylcs44t+ax)BWoC||HKSgwx{u^ut
z7=*#$wJ+pfUZ=P8mHG<h0s-&hp=(xGfPAv^@oF@r!R@p8N8eq*z3g!XD>lN12ML^L
zlNzLp4tx`ES&zf`iryfir^w~#rKpo#c--OC8LoGG<Fxn2uK7-SoYk-hK1oL@A~|P7
z+`EMc;oQG_9D?t65=FK`@Vi~;{B$JX-u5^TN@{!}JU(%(GOBdel)OIopB{JG`olZ;
c-d*1K_Z<S&e=mHx8im1oZ0W=K&*8WK0q!e{8UO$Q
diff --git a/w/ZapS-TD,ffb b/w/ZapS-TD,ffb
deleted file mode 100644
index a4c02169f1565475dc1f2955b3bd234f34817dc8..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001
literal 1269
zcmZuwzmL>L7<Ca8DUv&q5`8Qb7io8o9}&_4Ct;2~VsY6!otGf!X6?`35%!Fk8MC*P
zsi~={k?5%TFDTN{Q6sre-uQOSqQr%FJ>Q!*?|a{yFbH;9I?(mX$YSB>`rh6xic)P9
z7OT2(Y%CqQEDVAREnbtBj%3Qpaz>5H*pOQ=MYTxrv#t#3PwbLf(T(vn+VOzFx-|Ip
z4oD7LTIq%=u_C1%HI~65E#<Og;<J=%M^aG=0i_fwWm-zN=uTSmjKMN$>FJt9&z-;q
zfi3llbiNHG;WpxbYso(g=jz+LyUXQrEIQ$1ZHnFUye+$X6dz2c$z%lan~iZxk5$Rm
zlHnJPG-!UlB2hzLD&`PfiX~}7qA-k_(_a44NGDY>B&&0`6o$d}u%%2|XXG5tZacW{
zi{QdG03HfOgD9am8PNSGiIX8{rY${*XTKjmp3#%&^fa2z;z>fsr*v>UeGt#$<0-xl
zDVjc|NAdK*kQn}9R(w_)-vy*f?=5HENOYI5A3;As%7O6Tw&qmkGDU-`XhgwO=$C91
z`l6amC9R*cg-D-}t1XqXl1{j8@moH&rsh-h(_Txp(S;F}_i7>1=VZqxjZ0EdayImf
zhAW)Zi7;HiGd5vx@gDr+Tq-#0kIjt+19ak#a+|?h-56wM<SQ#mOJNsXfWqL?ehUvk
z=JjtAxrJ~YkyL5fWWFq{<qESkKA#po?fe4QPZPR@C`L`;ugc9ZxbZ_6-2FMCeR@Bz
z<Jlia8PA(y5C(^%FXWf6(QEojsP+9(E)euCCc0*I8Q_zhPgkNL4eosB!}$9LxMw}C
zV8urG5Fv?EZBm1j(ShFqT-M{@fudK4>N#>bekST<bdn?;PJP4mmT&C#2H7>=S&y?C
zKEW*MC`B~qjHr9d5G9=ZSC7L5@PmmWTj2t91JU_;Kft~2aUPV^xGFq3bF4C|bk>x-
mKKD(JJKy@hZ}7dnwDIph2vpzw`1h443_f5~A1{0k|M?e=d65bL
--
GitLab