Voting
Category
real language
Bookmarking
Language Magnum
| Date: | 05/17/05 |
| Author: | Wim Roeling |
| URL: | n/a |
| Comments: | 2 |
| Info: | n/a |
| Score: |  (3.00 in 5 votes) |
! Magnum is a procedural language belonging to a DBMS, developed by Tymshare Inc. in the mid 70's.
! It is still in use today and supported by Allshare BV, The Netherlands
procedure bottles.of.beer
begin
field x as '5z'
! Magnum Version of 99 Bottles of beer
move 100 to x
while x > 0 do
begin
type x," Bottle(s) of beer on the wall,"
,x," bottle(s) of beer" ,@cr
,"Take one down and pass it around," ,@cr
,(x-1) as '5z'," bottle(s) of beer on the wall" ,@cr
subtract 1 from x
end
end
Download Source | Write Comment
Download Source | Write Comment
Add Comment
Please provide a value for the fields Name,
Comment and Security Code.
This is a gravatar-friendly website.
E-mail addresses will never be shown.
Enter your e-mail address to use your gravatar.
Please don't post large portions of code here! Use the form to submit new examples or updates instead!
Comments
x = 100
x = x-1
work just fine; most of the tymshare mis code used the non-daim-bramaged syntax variants.
you could do system-level programming with mag if you knew the un-documented type interfaces and statements. *sigh*
i can still remember the first time i saw sql. i thought 'no need to learn this; NO ONE will be stupid enough to use this language...'
I have some ideas about magnum ...
I would like to know how to compile a magnum procedure? With bliss?
The binary file is runnable on VMS? on i386-based emulator?
Many thanks for your help.