Menu
▾
▴
SF.net SVN: frontierkernel: [1731] ODBs/trunk/mainResponderRoot/ mainResponder/respond.fvc
|
From: <cre...@us...> - 2007-09-08 20:03:08
|
Revision: 1731
http://frontierkernel.svn.sourceforge.net/frontierkernel/?rev=1731&view=rev
Author: creecode
Date: 2007-09-08 13:02:59 -0700 (Sat, 08 Sep 2007)
Log Message:
-----------
minor script formatting tweaks
replace extensions.latinToMac.convert with string.latinToMac
Modified Paths:
--------------
ODBs/trunk/mainResponderRoot/mainResponder/respond.fvc
Modified: ODBs/trunk/mainResponderRoot/mainResponder/respond.fvc
===================================================================
--- ODBs/trunk/mainResponderRoot/mainResponder/respond.fvc 2007-09-07 19:58:11 UTC (rev 1730)
+++ ODBs/trunk/mainResponderRoot/mainResponder/respond.fvc 2007-09-08 20:02:59 UTC (rev 1731)
@@ -1,8 +1,9 @@
-FrontierVcsFile:2:scpt:mainResponder.respond
+FrontierVcsFile:3:scpt:mainResponder.respond
on respond (adrParamTable, fldebug = false) {
+
«Changes
- «2/28/06; 11:21:17 AM by TAC
+ «9/8/07; 12:48:54 PM by TAC
«minor script formatting tweaks
«replace extensions.latinToMac.convert with string.latinToMac
«10/18/05 AM by TAC
@@ -112,8 +113,8 @@
if config.mainresponder.prefs.flProfiling {
local (prefix = "/profile/"); //PBS 10/27/00: prefix changed from /profile to /profile/ -- to avoid conflict with Manila's profiles and any other URL that begins with /profile
«msg (adrParamTable^.path)
- if adrParamTable^.path beginswith prefix {
- adrParamTable^.path = string.delete (adrParamTable^.path, 1, sizeof (prefix));
+ if adrParamTable^.path beginsWith prefix {
+ adrParamTable^.path = string.delete (adrParamTable^.path, 1, sizeOf (prefix));
adrParamTable^.path = "/" + adrParamTable^.path;
script.startProfile (true);
flprofile = true}};
@@ -130,7 +131,7 @@
fldebug = false}
else {
if not defined (config.mainresponder.debugLog) {
- new (tabletype, @config.mainresponder.debugLog)};
+ new (tableType, @config.mainresponder.debugLog)};
adrdebuglog = xml.addtable (@config.mainresponder.debugLog, string.timestring ());
addDebugLog ("paramsIn", adrParamTable^);
addDebugLog ("path", adrParamTable^.path);
@@ -144,14 +145,14 @@
if adrParamTable^.requestHeaders.["User-Agent"] != "Testing in Debugger" {
scratchpad.paramtable = adrParamTable^}}}};
- local (adratts = @adrParamTable^.responderAttributes);
+ local (adrAtts = @adrParamTable^.responderAttributes);
- adratts^ = config.mainresponder.globals;
+ adrAtts^ = config.mainresponder.globals;
on noFolderError (f) {
scriptError ("There is no folder or object database named \"" + (file.filefrompath (f) - file.getpathchar ()) + "\" in the folder \"" + file.folderfrompath (f) + "\".")};
- on gatherAttributes (adrtable) { //copy all #attributes from the table into adratts^
+ on gatherAttributes (adrtable) { //copy all #attributes from the table into adrAtts^
«this does something different from html.buildPageTable
«it adds them one level at a time, we don't care how we got here
«in html.buildPageTable we pop all the way out to the top of the website.
@@ -161,11 +162,11 @@
if defined (adrsecurityscript^) { //great! the sysop is using a cool feature
callScript (adrsecurityscript, {}, adrParamTable)}; //scriptError to kill request
- local (i, ct = sizeof (adrtable^), adritem, name);
+ local (i, ct = sizeOf (adrtable^), adritem, name);
for i = 1 to ct {
adritem = @adrtable^ [i];
name = nameof (adritem^);
- if not (name beginswith "#") {
+ if not (name beginsWith "#") {
break};
name = string.delete (name, 1, 1); //pop off the #
case string.lower (name) {
@@ -176,38 +177,38 @@
«if defined (objectName) //PBS 12/16/99: commented out to fix a bug where URLs would have repeated elements, such as /foo/foo rather than /foo. (Was: make sure objectName is defined.)
«url = url + objectName
if defined (path) { //make sure path is defined
- if sizeof (path) > 0 {
- if not (url endswith "/") {
+ if sizeOf (path) > 0 {
+ if not (url endsWith "/") {
url = url + "/"};
url = url + path}};
«dialog.alert (url)
scriptError ("!redirect " + url)}};
- case typeof (adritem^) {
- tabletype {
+ case typeOf (adritem^) {
+ tableType {
if string.lower (name) == "prefs" {
- local (i, ct = sizeof (adritem^), adrprefsitem, name);
+ local (i, ct = sizeOf (adritem^), adrprefsitem, name);
for i = 1 to ct {
adrprefsitem = @adritem^ [i];
name = nameof (adrprefsitem^);
- if name beginswith "#" {
+ if name beginsWith "#" {
name = string.delete (name, 1, 1)};
- adratts^.[name] = adrprefsitem^}}
+ adrAtts^.[name] = adrprefsitem^}}
else { //copy the address of the table
try {delete (@adrAtts^.[name])}; //work around an apparent kernel bug
- adratts^.[name] = adritem}};
- outlinetype;
- scripttype;
- menubartype;
- binarytype;
- wptexttype {
- adratts^.[name] = adritem}} //copy the address
+ adrAtts^.[name] = adritem}};
+ outlineType;
+ scriptType;
+ menubarType;
+ binaryType;
+ wptextType {
+ adrAtts^.[name] = adritem}} //copy the address
else {
- adratts^.[name] = adritem^}}};
+ adrAtts^.[name] = adritem^}}};
on attMustBeTrue (attname) {
on attError () {
scriptError ("The attribute \"" + attname + "\" must be true.")};
- local (adratt = @adratts^.[attname]);
+ local (adratt = @adrAtts^.[attname]);
if defined (adratt^) {
if not adratt^ { //it's false
attError ()}}
@@ -216,7 +217,7 @@
return (true)};
on attIsTrue (attname) {
- local (adratt = @adratts^.[attname]);
+ local (adratt = @adrAtts^.[attname]);
if defined (adratt^) {
return (boolean (adratt^))}
else {
@@ -232,8 +233,8 @@
add ("<directory>"); indentlevel++;
fileloop (f in folder) {
local (name = file.filefrompath (f));
- if name endswith pc {
- name = string.delete (name, sizeof (name), 1)};
+ if name endsWith pc {
+ name = string.delete (name, sizeOf (name), 1)};
add ("<file>"); indentlevel++;
add ("<name>" + name + "</name>");
bundle { //add type
@@ -241,7 +242,7 @@
if file.isfolder (f) {
mimeType = "folder"}
else {
- if name endswith ".root" {
+ if name endsWith ".root" {
mimetype = "application/x-frontier-database"}
else {
local (objectType = file.type (f));
@@ -278,17 +279,17 @@
on serveObject (adr) {
bundle { //set up the URLs table
- if not defined (adratts^.urls) { //there's no #urls server attribute
- adratts^.urls = @config.mainresponder.urls}};
+ if not defined (adrAtts^.urls) { //there's no #urls server attribute
+ adrAtts^.urls = @config.mainresponder.urls}};
mainResponder.members.checkMembership (adr, adrParamTable); //scriptErrors if redirecting
- if (adratts^.flrender) and (typeof (adr^) != binaryType) { //pass it thru the website framework
+ if (adrAtts^.flrender) and (typeOf (adr^) != binaryType) { //pass it thru the website framework
local (adrcacheitem = nil);
- if defined (adratts^.flRenderingCache) and (adratts^.flRenderingCache) { //this page can be cached
+ if defined (adrAtts^.flRenderingCache) and (adrAtts^.flRenderingCache) { //this page can be cached
local (adrcache = mainResponder.cache.getCacheTable ());
adrcacheitem = @adrcache^.[string (adr)];
if defined (adrcacheitem^) {
if timeModified (adrcacheitem) >= timeModified (adr) { //the cache is still good
- if typeof (adr^) != scripttype {
+ if typeOf (adr^) != scriptType {
«PBS 8/25/99: call a callback that can decide whether or not to serve this from the cache.
adrParamTable^.flServeFromCache = true;
if defined (config.mainResponder.callbacks.serveFromCache) {
@@ -307,7 +308,7 @@
adrParamTable^.responseBody = html.buildObject (adr, adrParamTable)};
if adrcacheitem != nil { //caching is enabled
if not defined (adrcacheitem^) {
- new (tabletype, adrcacheitem)};
+ new (tableType, adrcacheitem)};
adrcacheitem^.hits = 0;
wp.newtextobject (adrParamTable^.responseBody, @adrcacheitem^.text);
fileMenu.saveMyRoot (adrcacheitem)};
@@ -315,32 +316,32 @@
if defined (adrredirecturl^) {
scriptError ("!redirect " + adrredirecturl^)}}
else {
- case typeof (adr^) {
- scripttype {
+ case typeOf (adr^) {
+ scriptType {
serveScript (adr)}}
else {
- if defined (adratts^.rawTextPreformatted) and (adratts^.rawTextPreformatted) {
+ if defined (adrAtts^.rawTextPreformatted) and (adrAtts^.rawTextPreformatted) {
local (s = string.replaceall (string (adr^), "<", "<"));
adrParamTable^.responseBody = "<html><body><pre>\r" + s + "\r</pre></body></html>"}
else {
adrParamTable^.responseBody = string (adr^)};
adrParamTable^.responseHeaders.["Content-Type"] = mainResponder.getODBMimeType (adr);
local (moddate = timeModified (adr));
- if typeof (moddate) == booleantype {
+ if typeOf (moddate) == booleantype {
moddate = clock.now ();
try { //JES 9/16/04: use mod date of parent table
- if typeOf (parentOf (adr^)^) == tabletype {
+ if typeOf (parentOf (adr^)^) == tableType {
moddate = timeModified (parentOf (adr^))}}};
adrParamTable^.responseHeaders.["Last-Modified"] = date.netStandardString (moddate)}}};
on folderToHTML (folder) {
attMustBeTrue ("allowDirectoryListings");
bundle { //set up the URLs table; Fri, 12 Mar 1999 00:50:44 GMT by AR
- if not defined (adratts^.urls) { //there's no #urls server attribute
- adratts^.urls = @config.mainresponder.urls}};
+ if not defined (adrAtts^.urls) { //there's no #urls server attribute
+ adrAtts^.urls = @config.mainresponder.urls}};
local (adrscript = @mainResponder.folderToHTML);
- if defined (adratts^.folderToHTML) {
- adrscript = @adratts^.folderToHTML;
+ if defined (adrAtts^.folderToHTML) {
+ adrscript = @adrAtts^.folderToHTML;
if typeOf (adrScript^) == addressType { //PBS 8/11/99: if adrScript^ is an address, de-reference
adrScript = adrScript^}};
return (adrscript^ (folder, adrParamTable))};
@@ -349,29 +350,29 @@
gatherAttributes (adrtable);
attMustBeTrue ("allowDirectoryListings");
bundle { //set up the URLs table; Fri, 12 Mar 1999 00:50:40 GMT by AR
- if not defined (adratts^.urls) { //there's no #urls server attribute
- adratts^.urls = @config.mainresponder.urls}};
+ if not defined (adrAtts^.urls) { //there's no #urls server attribute
+ adrAtts^.urls = @config.mainresponder.urls}};
local (adrscript = @mainResponder.tableToHTML);
- if defined (adratts^.tableToHTML) {
- adrscript = @adratts^.tableToHTML;
+ if defined (adrAtts^.tableToHTML) {
+ adrscript = @adrAtts^.tableToHTML;
if typeOf (adrScript^) == addressType { //PBS 8/11/99: if adrScript^ is an address, de-reference
adrScript = adrScript^}};
return (adrscript^ (adrtable, adrParamTable))};
on openRootFile (f) {
if not window.isOpen (f) {
- if file.filefrompath (f) beginswith "#" {
+ if file.filefrompath (f) beginsWith "#" {
scriptError ("Can't open the file \"" + f + "\" because its name begins with a pound-sign.")};
fileMenu.open (f, hidden:true);
if config.mainResponder.prefs.flLogDatabaseOpens {
«you may want to add this file to user.databases
local (adrtable = @system.temp.mainResponder.databaseOpensLog);
if not defined (adrtable^) {
- new (tabletype, adrtable)};
+ new (tableType, adrtable)};
adrtable^.[f] = clock.now ()}}};
on checkPoundsign (name) { //scriptErrors if the name begins with a #
- if name beginswith "#" {
+ if name beginsWith "#" {
scriptError ("Can't serve \"" + name + "\" because its name begins with a pound-sign.")}};
on tableDive (nomad, name) {
@@ -438,7 +439,7 @@
if not file.exists (f) {
noFolderError (f)}};
if file.isfolder (f) {
- if not (f endswith pc) {
+ if not (f endsWith pc) {
f = f + pc};
return (filespec (f + name))}
else { //it might be a guest database
@@ -449,7 +450,7 @@
on pathMustEndWithSlash () {
local (s = string.trimWhiteSpace (adrParamTable^.path));
- if not (s endswith "/") {
+ if not (s endsWith "/") {
scriptError ("!redirect " + s + "/")}};
on pathMustNotEndWithSlash () { //PBS 7/30/99: tables rendered as pages must not end with a slash
@@ -464,7 +465,7 @@
if typeOf (adrTable) == fileSpecType {
return (serveFolder (adrTable))}}; //it's really a filespec
- local (defaults = list (adratts^.defaultDirectoryItems), item, adritem, flnotfound = true);
+ local (defaults = list (adrAtts^.defaultDirectoryItems), item, adritem, flnotfound = true);
if defined (adrTable^.["#defaultDirectoryItems"]) { //Fri, 12 Mar 1999 01:24:15 GMT by AR
defaults = list (adrTable^.["#defaultDirectoryItems"])};
@@ -481,7 +482,7 @@
break}};
if flnotfound {
- if defined (adratts^.renderTableWith) {
+ if defined (adrAtts^.renderTableWith) {
pathMustNotEndWithSlash (); //PBS 7/30/99: this table is a page: it must not end in a slash
serveObject (adrtable)}
else {
@@ -491,9 +492,9 @@
on serveFolder (folder) {
pathMustEndWithSlash (); //possibly redirect
local (pc = file.getpathchar ());
- if not (folder endswith pc) {
+ if not (folder endsWith pc) {
folder = folder + pc};
- local (defaults = list (adratts^.defaultDirectoryItems), item, f, flnotfound = true);
+ local (defaults = list (adrAtts^.defaultDirectoryItems), item, f, flnotfound = true);
for item in defaults {
f = folder + item;
if file.exists (f) {
@@ -540,7 +541,7 @@
local (i, ct = sizeOf (adrGlobals^), adritem);
for i = 1 to ct {
adritem = @adrGlobals^ [i];
- adratts^.[nameof (adritem^)] = adritem^};
+ adrAtts^.[nameof (adritem^)] = adritem^};
return (true)};
on initialXmlSiteTreeDive (adrTable) { //PBS 06/10/00: XML siteTree support, broken out because used in two places -- this routine dives into the XML structure, first re-compiling if necessary
@@ -570,7 +571,7 @@
mainResponder.parseMultipart (adrParamTable)} //parse multipart form into adrParamTable^.postArgs
else {
local (adrtable = @adrParamTable^.postArgs);
- new (tabletype, adrtable);
+ new (tableType, adrtable);
webserver.parseArgs (adrParamTable^.requestBody, adrtable)}}};
local (nomad);
@@ -662,7 +663,7 @@
bundle { //based on type, initialize nomad
on setnomad (adrdomain) {
case typeOf (adrdomain^) {
- tabletype {
+ tableType {
if defined (adrDomain^.siteTree) { //PBS 06/09/00: handle XML siteTree tables
nomad = initialXmlSiteTreeDive (adrDomain);
return (true)}
@@ -672,10 +673,10 @@
if defined (adrdomain^.globals) { //add the elements of this table to the responder attributes table
gatherGlobals (@adrDomain^.globals); //PBS 06/09/00: code below was broken out, since it was used in multiple places
};
- «local (i, ct = sizeof (adrdomain^.globals), adritem)
+ «local (i, ct = sizeOf (adrdomain^.globals), adritem)
«for i = 1 to ct
«adritem = @adrdomain^.globals [i]
- «adratts^.[nameof (adritem^)] = adritem^
+ «adrAtts^.[nameof (adritem^)] = adritem^
setnomad (@adrdomain^.doctree)}; //recurse
stringtype {
local (s = adrdomain^);
@@ -683,8 +684,8 @@
«scriptError ("!redirect " + s + adrParamTable^.path)
scriptError ("!redirect " + s + string.nthField (adrParamTable^.firstLine, ' ', 2))}; //JES 07/04/00: if the path contains path args, make sure they're part of the URL redirected to
nomad = filespec (adrdomain^)};
- addresstype;
- filespectype {
+ addressType;
+ filespecType {
nomad = adrdomain^}}
else {
scriptError ("Server configuration error. The type of a domain doctree must be either table, string or filespec.")}};
@@ -707,27 +708,27 @@
bundle { //leave nomad pointing to the object to be served
if not flCallbackParsedPath { //PBS 8/25/99: if callback evaluated path, skip this bundle
- local (stack = {}, path, objectname);
+ local (stack = {}, path, objectName);
«path = string.lower (string.urlDecode (adrParamTable^.path))
if system.environment.isMac { //JES 9/16/04: handle high-ascii in URL properly
path = string.lower (string.latinToMac (string.urlDecode (adrParamTable^.path)))}
else { //not MacOS -- just do string.lower, without character translation
path = string.lower (string.urlDecode (adrParamTable^.path))};
- if path beginswith "/" {
+ if path beginsWith "/" {
path = string.delete (path, 1, 1)};
bundle { //when Frontier is running behind a web server like WebSTAR or IIS, ignore .wsf extensions
if defined (adrParamTable^.wsfSuffixRequired) {
if adrParamTable^.wsfSuffixRequired {
if string.lower (path) endsWith ".wsf" {
- path = string.mid (path, 1, sizeof (path) - 4)}}}};
- while sizeof (path) > 0 {
+ path = string.mid (path, 1, sizeOf (path) - 4)}}}};
+ while sizeOf (path) > 0 {
local (flsystemwebsite = false); //PBS 10/25/99: moved this declaration so it gets set false for the next part of the path. Otherwise URLs inside the system website won't work.
- objectname = string.nthField (path, '/', 1);
+ objectName = string.nthField (path, '/', 1);
bundle { //check for system websites, like controlPanel
- if sizeof (stack) == 0 { //check for special mainResponder-implemented websites
+ if sizeOf (stack) == 0 { //check for special mainResponder-implemented websites
flsystemwebsite = false;
- case string.lower (objectname) {
+ case string.lower (objectName) {
"controlpanel" {
if defined (config.mainResponder.prefs.flControlPanel) and config.mainResponder.prefs.flControlPanel { //PBS 10/25/99: flControlPanel may not exist; check that it exists before checking its value
nomad = @mainResponder.controlPanel;
@@ -750,8 +751,8 @@
nomad = initialXmlSiteTreeDive (nomad)};
flsystemwebsite = true}}}}}}};
if not flsystemwebsite {
- if objectname == ".." { //pop the stack
- local (sizestack = sizeof (stack));
+ if objectName == ".." { //pop the stack
+ local (sizestack = sizeOf (stack));
if sizestack == 0 {
scriptError ("Can't surface beyond the root of the website.")};
nomad = stack [sizestack];
@@ -767,16 +768,22 @@
bundle { //PBS 01/07/02: don't serve files or folders whose name begins with a dot.
if objectName beginsWith "." {
scriptError ("Can't process objects with names beginning with a dot.")}};
- case typeof (nomad) {
- addresstype {
- while (typeof (nomad^) == addresstype) {nomad = nomad^};
- case typeof (nomad^) {
- tabletype { //diving into a table
- nomad = tableDive (nomad, objectname)};
- filespectype { //nomad now becomes a filespec
- nomad = folderDive (nomad^, objectname)}}};
- filespectype {
- nomad = folderDive (nomad, objectname)}}};
+
+ case typeOf ( nomad ) {
+ addressType {
+ while ( typeOf ( nomad^ ) == addressType ) {
+ nomad = nomad^};
+
+ case typeOf ( nomad^ ) {
+ tableType { // diving into a table
+ nomad = tableDive ( nomad, objectName )};
+ filespecType { // nomad now becomes a filespec
+ nomad = folderDive ( nomad^, objectName )};
+ stringType { // relative path
+ nomad = folderDive ( fileSpec ( nomad^ ), objectName )}}};
+ filespecType {
+ nomad = folderDive ( nomad, objectName )}}};
+
if fldebug {
addDebugLog ("step", nomad)};
@@ -790,7 +797,7 @@
adrParamTable^.remainingPath = path;
break};
- path = string.delete (path, 1, sizeof (objectname) + 1);
+ path = string.delete (path, 1, sizeOf (objectName) + 1);
stack = stack + nomad}}
else { //PBS 8/25/99: callback handled path parsing, but we need to gather attributes
if typeOf (nomad) == addressType {
@@ -799,13 +806,13 @@
else {
gatherAttributes (parentOf (nomad^))}}}};
- bundle { //serve the object nomad points to
+ bundle { // serve the object nomad points to
on serveFilespec (nomad) {
if file.exists (nomad) {
if file.isFolder (nomad) {
serveFolder (nomad)}
else {
- if string.lower (nomad) endswith ".root" {
+ if string.lower (nomad) endsWith ".root" {
openRootFile (nomad);
serveAddress (@[nomad])}
else {
@@ -817,7 +824,7 @@
nomad = @[f];
serveAddress (nomad)}
else {
- if tryError beginswith "!" { //it's a redirect, rethrow it
+ if tryError beginsWith "!" { //it's a redirect, rethrow it
scriptError (tryError)};
on error () {
noFolderError (nomad)};
@@ -825,21 +832,22 @@
if file.exists (f) {
serveFile (f)}
else {
- if string.lower (nomad) endswith ".xml" { //try to serve it as XML
- local (f = string.delete (nomad, sizeof (nomad) - 3, 4)); //pop off the .xml
+ if string.lower (nomad) endsWith ".xml" { //try to serve it as XML
+ local (f = string.delete (nomad, sizeOf (nomad) - 3, 4)); //pop off the .xml
if not file.exists (f) {
error ()};
serveAsXml (f)}
else {
error ()}}}}};
+
on serveAddress (nomad) {
- case typeof (nomad^) {
- addresstype {
+ case typeOf (nomad^) {
+ addressType {
serveAddress (nomad^)};
- filespectype {
+ filespecType {
serveFileSpec (nomad^)};
- scripttype {
- if adratts^.flrender {
+ scriptType {
+ if adrAtts^.flRender {
serveObject (nomad)}
else {
if attIsTrue ("allowScriptsToRun") {
@@ -849,14 +857,15 @@
local (s = string.replaceall (string (nomad^), "<", "<"));
«local (s = mainResponder.neuterText (string (nomad^), false, true))
adrParamTable^.responseBody = "<html><body><pre>\r" + s + "\r</pre></body></html>"}}}};
- tabletype {
+ tableType {
serveTable (nomad)}}
else {
serveObject (nomad)}};
- case typeof (nomad) {
- filespectype {
- serveFilespec (nomad)};
- addresstype {
+
+ case typeOf ( nomad ) {
+ filespecType {
+ serveFilespec ( nomad )};
+ addressType {
serveAddress (nomad)}}};
bundle { //compare If-Modified-Since with, maybe we can avoid serving it
@@ -899,7 +908,7 @@
add ("<blockquote>"); indentlevel++;
add ("<table cellspacing=\"5\">"); indentlevel++;
add ("<tr><td><b>" + "Procedure" + "</b></td><td><b>" + "Ticks" + "</b></td></tr>");
- for i = sizeof (info) downto 1 {
+ for i = sizeOf (info) downto 1 {
adritem = @info [i];
add ("<tr><td><font size=\"-1\">" + nameof (adritem^) + "</font></td><td><center><font size=\"-1\">" + adritem^ + "</font></center></td></tr>")};
add ("</table>"); indentlevel--;
@@ -930,7 +939,7 @@
local (s = tryError);
if s [1] == "!" { //it's a faked error
local (command = string.nthfield (s, ' ', 1));
- local (args = string.delete (s, 1, sizeof (command) + 1));
+ local (args = string.delete (s, 1, sizeOf (command) + 1));
case command {
"!redirect" {
adrParamTable^.code = 302; //non-permanent redirect
@@ -1018,7 +1027,7 @@
«tickspercall = double (clock.ticks () - ticks) / ctloops
«config.mainresponder.prefs.flDebug = olddebug
«if not defined (mainResponder.data.timingOutline)
- «new (outlinetype, @mainResponder.data.timingOutline)
+ «new (outlineType, @mainResponder.data.timingOutline)
«edit (@mainResponder.data.timingOutline)
«op.firstsummit ()
«op.insert (tickspercall + " ticks per call at " + string.timeString (), up)
@@ -1026,4 +1035,6 @@
«local (params = table.getcursoraddress ()^) //put cursor on param table you want to run
«params.requestHeaders.["User-Agent"] = "Testing in Debugger"
«try {delete (@params.paramtable.responderAtts)}
- «respond (@params)
\ No newline at end of file
+ «respond (@params)
+
+
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
