World: r3wp

What about having a central calculation engine in the app, and passing 
everything through that?

How does this help? You still have to check for an overflow either 
while doing every single operation or upfront.

Example: We have this simple formular:

result: (a * b) + (c * d)

There are three points of failure:
1. a * b overflows
2. c * d overflows
3. (a * b) + (c * d) overflows


And if you need to give feedback to the user you have to check every 
single operation.

I'd suggest something like this:

-- calculations are done in a special function that is passed a string, 
eg
   ans: calc "(a * b) + (c + d)"
-- the 'calc DOes the string, protected by an 'attempt
-- if it succeeds, it passes back the result

-- if not, it throws an error report. If necessary, you can parse 
the original string and try each part of the calculation to find 
the first failure....Recursively via 'calc to drill down nested parentheses 
of course.

**

Two obvious drawbacks to this suggestion:

1. all variables need to be global -- unless you do a lot of other 
work

2. beware side effects of malformed calc strings. You would not like 
it to be "delete/any *.*"

Maybe you can use an expression dialect to do the calculation.

If you want to provide exact details, you're going to have to do 
some analysis and processing yourself.

>> read http://store.apple.com

connecting to: store.apple.com
connecting to: store.apple.com

** User Error: Error.  Target url: http://store.apple.com/1-800-MY-APPLE/WebObjects/AppleStore
could not be retrieved.  Server response...
** Near: read http://store.apple.com

That's not a particularly useful error?

Nice thread contrasting LISP and REBOL:

http://coding.derkeiler.com/Archive/Lisp/comp.lang.lisp/2008-02/msg00756.html

Would be cool to reduce that argument (debate) to a table (like Gregg 
did for Python).  If someone does that part, I will update the Qwiki...

Would love to have a collection of REBOL vs EVERYTHING

Henrik, btw, R3 can read that URL.

I can read it from R2 as well

And one can always use  trace/net on  to see, where is a problem

must have been while the store was down. some one came up with a 
bash script to check when it would come up again, and thought it 
would be easy to do in rebol, but no. :-/

but maybe it's because I'm using my own version of http scheme

works in standard R2 right now

when the store is down, the replace the page with a message. it's 
not like the site goes entirely down.

they replace

ah... you have to use modified scheme for that if the site is responding 
something with error message.

interesting. would it be qualified for 2.7.6?

or you can use this:

if error? set/any 'err try [read http://store.apple.com][  err: disarm 
err probe err/arg1]

the server response is truncated only in console... I've just tested 
it with a very long invalid local url.

and someone should fix the altme to display correctly urls... is 
it just me who don't like it? Such a visible thing:/

yes, I don't like it either...

and it's such a simple fix.. it just needs to enhance the width of 
the face which is used to measure the width of the text.... I bet 
it's just a one byte fix.

let's bring it to the 2.7.6 group and point it out there.

sorry, I'm talking nonsense.

if it's an error response, you can catch it in R3 in async mode. 
:) more work, but you don't need to hack the http scheme.

Here's something I haven't figured out yet: Let's say I have an object 
that includes other objects
make object! [
lists: ["tom" "fred"]

objs: [ [ make object! [ name: "hello"] ] [make object! [name: "world"] 
]  ]
]

When I "load" this back from a file, is there a way I can "do" the 
entire object. It appears that the obj/objs remain in their rebol 
form but are not "real" objects. For now I have been just "doing" 
them as I get to them but it sure would be nice to simply get it 
done all at once.

Thanks, I hope you understand what I mean.

do you try save/all to save the object to a file?

James,
Create some nested objects:


 objects: context [objs: reduce [reduce [context [name: "hi"]] reduce 
 [context [name: "there"]]]]
	
Save them in a binary (should be just like saving to file):

	bin: make binary! ""
	
	save/all bin objects
	
Load back from the binary (should be like loading from file):
	
	objects2: do as-string load bin
	
Test to see if the nested objects were created properly:	
	
	>> type? objects2/objs/1/1
	== object!

	>> probe objects2/objs/1/1
	make object! [
		name: "hi"
	]

I need to be able to explicitly determine if something some functions 
return false as their value.  I wrote a quick function to do this 
but shouldn't we already have something that does this?

My function is:


false?: func [val][either all [logic? val not val][return yes][return 
no]]

That would be truefalse  :)   Sorry, couldn't resist.  But, yes, 
REBOL is very tri-state with the t f none thing. And zero being true, 
as a forther still rubs wrong, but that chaffing is almost over and 
done with.  Plus RebGUI now supports bi-state options, so life is 
good(er).  :)

no that function wouldn't tell you if something is true.

true? func [val][either all [logic? val val][yes][no]]

Sorry, I meant   a "true" false.

yes

I investigating the deets, but you might get away with strict-equal? 
   res == false; need to test.

what is the difference again between strict-equal? and equal?

strict-equal? compares value and type, and then there is identical 
testing with =?   where

a: "abc"  b: "abc"     a =? b  is false   c: a   a =? c  is true 
(pretty much has to occupy the same ram)

Oh just in case   1 = 1.0 is true   1 == 1.0 is not.

that is what I thought btiffin - when you mentioned using strict-equal? 
you have me confused.  How did you see it being used in a true false 
function?

Instead of    if false? expression [ ]   you might get away with 
 if strict-equal? false expression [ ]   and skip writing the false? 
 func.

All you should ever need is 
	= false

Good point.  Paul ... What Anton said.  ;)

Yeah I don't see a need for a true function only a false function.

Anyone know of a bug in REBOL where the word "end" shows up in a 
list! of values?  I have got this weird problem where the word "end" 
shows up in what should be a list! block of nothing but integers 
but instead I have integers and a few references of the word "end" 
without the string as it is not a string datatype.  If I do a foreach 
and attempt to step through each item it crashes on that entry.  
I can't determine what datatype it is.  I looked at my code and nothing 
in my code or the data it handles contains the word "end".

I did some more research and it appears that the "end" I seen is 
a datatype.  I didn't even know there was an end! datatype.

here is what the list block looks like for example:


== make list! [1 4 5 end unset 6 7 8 9 10 11 12 13 14 15 16 17 18 
19]

except it is a lot longer


I'm not sure why I'm getting the unset! or the end! datatypes at 
this point.  I only use insert to add to this list and all the values 
being inserted should be integer datatypes.

You could test, if what you're inserting actual is an integer. Something 
like:

if integer! <> type? value-to-insert [print ["Not an integer:" value-to-insert]]