TempleOSCDV4.12.ISO
This commit is contained in:
1 parent
93ca216483
commit
b84bbff6db
381 files changed
+18356
-18798
No files matched your search
@@ -38,7 +38,7 @@ public U0 DocProfile(U8 *filename,I64 flags)
|
||||
"%4Z:%d\n",i,"ST_DOC_CMDS",cmd_stats[i];
|
||||
|
||||
"\n$$GREEN$$'$$PURPLE$$doc_e->type.u8[1]$$GREEN$$' is "
|
||||
"the screen color attr of the "
|
||||
"the scrn color attr of the "
|
||||
"entry. '$$PURPLE$$doc_e->type.u16[1]"
|
||||
"$$GREEN$$' is some flags for blinking and "
|
||||
"stuff. See $$LK,\"Doc Type Flag "
|
||||
|
||||
+11
-11
@@ -1,25 +1,25 @@
|
||||
U0 TreeSub(CDoc *doc,CDirEntry *tempde)
|
||||
U0 TreeSub(CDoc *doc,CDirEntry *tmpde)
|
||||
{
|
||||
CDirEntry *tempde1;
|
||||
while (tempde) {
|
||||
tempde1=tempde->next;
|
||||
if (tempde->attr & RS_ATTR_DIR) {
|
||||
CDirEntry *tmpde1;
|
||||
while (tmpde) {
|
||||
tmpde1=tmpde->next;
|
||||
if (tmpde->attr & RS_ATTR_DIR) {
|
||||
DocPrint(doc,"$$TR,\"\"$$");
|
||||
DocPrint(doc,"$$MA,T=\"%s\",LM=\"Cd(\\\"%s\\\");Dir;\n\"$$\n",
|
||||
tempde->name,tempde->full_name);
|
||||
if (tempde->sub) {
|
||||
tmpde->name,tmpde->full_name);
|
||||
if (tmpde->sub) {
|
||||
DocPrint(doc,"$$ID,+2$$");
|
||||
TreeSub(doc,tempde->sub);
|
||||
TreeSub(doc,tmpde->sub);
|
||||
DocPrint(doc,"$$ID,-2$$");
|
||||
}
|
||||
} else
|
||||
DocPrint(doc,"$$LK,\"%s\",A=\"FI:%s\"$$\n",
|
||||
tempde->name,tempde->full_name);
|
||||
tmpde->name,tmpde->full_name);
|
||||
//Note there is also a routine
|
||||
//to delete an entire CDirEntry tree.
|
||||
//See $LK,"DirTreeDel",A="MN:DirTreeDel"$().
|
||||
DirEntryDel(tempde);
|
||||
tempde=tempde1;
|
||||
DirEntryDel(tmpde);
|
||||
tmpde=tmpde1;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
+12
-12
@@ -16,7 +16,7 @@ U0 UnusedDefineScan()
|
||||
CDoc *old_put_doc,*old_display_doc,*doc;
|
||||
I64 i,cnt=0;
|
||||
CHashTable *table;
|
||||
CHash *temph;
|
||||
CHash *tmph;
|
||||
CDocEntry *doc_e,*doc_e2;
|
||||
Bool old_silent=IsSilent;
|
||||
|
||||
@@ -24,11 +24,11 @@ U0 UnusedDefineScan()
|
||||
table=Fs->hash_table;
|
||||
while (table) {
|
||||
for (i=0;i<=table->mask;i++) {
|
||||
temph=table->body[i];
|
||||
while (temph) {
|
||||
if (temph->type&HTT_DEFINE_STR)
|
||||
tmph=table->body[i];
|
||||
while (tmph) {
|
||||
if (tmph->type&HTT_DEFINE_STR)
|
||||
cnt++;
|
||||
temph=temph->next;
|
||||
tmph=tmph->next;
|
||||
}
|
||||
}
|
||||
table=table->next;
|
||||
@@ -41,22 +41,22 @@ U0 UnusedDefineScan()
|
||||
table=Fs->hash_table;
|
||||
while (table) {
|
||||
for (i=0;i<=table->mask;i++) {
|
||||
temph=table->body[i];
|
||||
while (temph) {
|
||||
if (temph->type&HTT_DEFINE_STR) {
|
||||
tmph=table->body[i];
|
||||
while (tmph) {
|
||||
if (tmph->type&HTT_DEFINE_STR) {
|
||||
progress1++;
|
||||
if (FileOcc(temph->str,"/*","+l-i+T")==1) {
|
||||
if (FileOcc(tmph->str,"/*","+l-i+$$")==1) {
|
||||
doc=DocNew;
|
||||
old_put_doc=DocPut;
|
||||
old_display_doc=DocDisplay;
|
||||
Fs->put_doc=Fs->display_doc=doc;
|
||||
Find(temph->str,"/*","+l-i+T");
|
||||
Find(tmph->str,"/*","+l-i+$$");
|
||||
Fs->put_doc=old_put_doc;
|
||||
Fs->display_doc=old_display_doc;
|
||||
doc_e=doc->head.next;
|
||||
while (doc_e!=doc) {
|
||||
if (doc_e->type_u8==DOCT_LINK) {
|
||||
"%s ",temph->str;
|
||||
"%s ",tmph->str;
|
||||
doc_e2=DocEntryCopy(doc,doc_e);
|
||||
DocInsEntry(old_put_doc,doc_e2);
|
||||
'\n';
|
||||
@@ -66,7 +66,7 @@ U0 UnusedDefineScan()
|
||||
DocDel(doc);
|
||||
}
|
||||
}
|
||||
temph=temph->next;
|
||||
tmph=tmph->next;
|
||||
}
|
||||
}
|
||||
table=table->next;
|
||||
|
||||
Reference in new issue
Block a user