TweetFollow Us on Twitter

March 93 - An Introduction to BETA: A New Object-oriented Language

An Introduction to BETA: A New Object-oriented Language

Steve Mann

New object-oriented products are announced every day. Most of them are based on a familiar language such as C++, SmallTalk, or LISP / CLOS. New object-oriented languages are another matter. When was the last time you saw an announcement for a commercial-grade object-oriented language product? BETA is such a product.

Development on BETA started in 1976 as a joint venture between several universities in Norway, Denmark, and Finland. This is the same computer science community (often called the Scandinavian School of object-orientation) that in the early 1960s developed Simula, the first object-oriented language. Throughout its formative years, the BETA research has been supported by grants from many companies, including Apollo, Apple, and Hewlett Packard. After more than 15 years of research and development, Mjolner Informatics has released the first commercial BETA product.

AN OVERVIEW OF BETA

BETA is a completely new language with a design heavily influenced by its object-oriented predecessors, especially Simula. It is strongly typed like C++, with most type checking being done at compile time. The language design is based on a powerful abstraction mechanism called a pattern. The syntax for a pattern is:
<Pattern Name> :
    (#  <Attribute 1> ;
        <Attribute 2> ;
            .
        <Attribute N> ;

    Enter <Input list>
    Do <Imperatives>
    Exit <Output list>
    #);

Attributes can be many things-the most common are object declarations and methods specific to the pattern being defined. The Enter statement lists the values passed to the Do section, Exit lists the values output from the Do section. The Do section contains imperative (executable) statements that perform actions. All the syntactic elements of a pattern are optional.

There are several types of patterns, including classes, procedures, functions, coroutines, processes, and exceptions. There are also three types of pattern derivatives:

  • subpatterns (like subclasses but more powerful),
  • virtual patterns (like C++ virtual procedures), and
  • pattern variables (variables that can be assigned any legal pattern value).

You can create any of these three derivatives from any of BETA's pattern types, making BETA a very orthogonal language. For instance, using subpatterns, you can create a hierarchy of procedures, functions, coroutines, processes, or exceptions, where all the subpatterns inherit attributes from their superpatterns. You can also define virtual classes, virtual procedures, virtual functions, and so on . Table 1 lists all the possible combinations of pattern derivatives and types.

Other important BETA features include:

  • class-less objects for one-of-a-kind object definitions;
  • direct and reference (pointer-based) attributes allowing the modeling of complex relationships;
  • block structures similar to Algol, allowing nested structures with local and global scopes for all patterns.

SAMPLE PROGRAMS

Here is a simple class pattern that defines a bank account object. It has three attributes-balance (a declaration using a predefined class pattern called integer), Deposit (a procedure pattern), and Withdraw (another procedure pattern).
Account :  (* a simple bank account class pattern *)   
    (#  balance : @ integer;        (* bank account balance *)

        Deposit :       (* add 'amount' to balance *) 
            (#  amount : @ integer          (* local declaration *)
            enter amount                    (* input list *)
            do balance + amount -> balance   (* action *)
            exit balance                        (* output list *)
            #); 
        Withdraw :      (* subtract 'amount' from balance *)
            (#  amount : @ integer  
            enter amount    
            do balance - amount -> balance
            exit amount     
            #); 
    #); 

Note that:

  • Asterick/parens ('(*' and '*)') are used to enclose comments.
  • A colon (':') indicates a declaration.
  • An @ sign indicates the name of an object type.
  • Integer is a predefined BETA basic pattern (the other basic patterns are real, boolean, and char, plus there is a predefined text pattern that works much like strings).
  • Imperative statements always read left to right.

According to BETA terminology, both Deposit and Withdraw are procedure (not function) patterns. BETA procedures and functions both can have input and output lists. A BETA function computes a return value using only the input values, causing no side effects (a procedure may cause side effects).

The preceding sample is simply a class definition pattern with attributes (balance) and methods (Deposit and Withdraw). In order to create a complete BETA program, we need more, such as some declarations to create real account objects, and some imperatives to perform actions on those accounts:

(# (* a pattern with no name *)
    Account : (*  a pattern declaration within the unnamed pattern *)
        (#  acct_balance : @ integer;
            Deposit :                
                (#  amount : @ integer  
                enter amount
                do acct_balance + amount -> acct_balance
                exit balance    
                #); 
            Withdraw :      
                (#  amount : @ integer  
                enter amount    
                do acct_balance - amount -> acct_balance
                exit amount     
                #); 
            Balance :
                (#
                exit acct_balance
                #)
        #); 
    A : @ Account;              
    cash_on_hand, balance : @ integer;  

do  100 -> &A.Deposit;               
    250 -> &A.Deposit;               
    75  -> &A.Withdraw -> cash_on_hand;   (* $75 on hand *)
    &A.Balance -> balance;                (* $275 balance *)
#)

In BETA the symbol '&' means new; the expression &account.Deposit means "create a new instance of the pattern account.Deposit and execute it". This is basically the same as invoking a procedure. Note that the finished program, the primary object definition (Account), and the methods that operate on that account (Deposit, Withdraw, and Balance) are all patterns. This use of a single syntactic element to define everything and execute operations gives BETA much of its power and flexibility.

REFERENCE ATTRIBUTES

BETA allows you to define both static and dynamic reference attributes. The previous sample programs all have examples of static object references such as
A : @ Account;             
cash_on_hand, balance : @ integer;

Static objects are also called part objects (or part references) in BETA because the declared objects are a permanent part of the objects containing their declarations.

BETA also lets you define object references that denote different objects at different points in time (much like pointers). An example of a dynamic reference is

A : ^Account ;

The initial value of a dynamic reference is NONE (trying to reference an object attribute using a NONE pointer causes a runtime error). If we define an account using

A1 : Account ;

we can assign A1 to A using the statement

A1[] -> A[] ;

It is also possible to create objects dynamically by invoking their pattern as an executable statement. For instance, the statement

&Account[]

creates a new instance of an Account and returns a reference to that account. If we declare a reference object using

A1 : ^Account;

the following statement is valid:

&Account[] -> A1[];

The difference between &Account and &Account[] is important. The first means "generate an instance of Account and execute it"; the second means "generate a new instance of Account without executing it and return a reference to it".

OTHER BETA SYNTACTIC ELEMENTS

When presenting a new language, there is always a certain amount of rote presentation to cover the basic syntax needed to create programs in that language. This section covers some of the more recognizable parts of BETA, including predefined basic patterns and attributes, arrays, assignment statements (evaluations), and control statements.

Basic Patterns

BETA has four predefined basic patterns : integer, real, boolean, and char. The default values and standard operators for BETA's basic patterns are shown in Table 2. In addition, BETA has a standard set of relational operators. Chars are ordered from 0 to 255, and false is less than true.

One unusual restriction that BETA has is that it is not possible to declare dynamic references to instances of these four basic patterns. Apparently this restriction is primarily for efficiency reasons.

Repetitions

BETA arrays (called repetitions) are defined using one of these two forms:
<Name>: [size] @<Type> ;       (* static repetition *)
<Name>: [size] ^<Type> ;        (* dynamic repetition *)

Array indices range from one to <Name>.range (range is an intrinsic attribute of all array objects). You can dynamically resize arrays using the extend attribute, which adds elements to an array. You can reallocate an array, initializing all the elements to the default value for the array object type. You can also assign array slices (or parts of an array).

Here are some array examples:

A1, A2 : [10] @integer;    (* integer arrays A1[1]-A1[10],
                              A2[1]-A2[10] *)
1050 -> A1.[1];         (* assignment *)
10 -> A1.extend;        (* resize A2 to 20 elements *)
25 -> A2.new;           (* resize and reinitialize A2 *)
A1 [1:5] -> A2 [10];    (* slice assignment *)

There is also a special repetition pattern called text which is derived from a string pattern. It is a character array, subject to all normal array operations, with additional predefined patterns for string manipulation.

For Statement

The BETA for statement is straightforward. It has the following form:
(for <Index>: <Range> repeat <Imperative-list> for)

<Index> is an integer object declared locally within the scope of the for statement. It cannot be changed within the loop. The index always starts at one and increments by one. A pattern with a for loop might look like

(#     sum: @ integer;
    V : [100] @ integer     (* integer array *)
do  (for i : V.range repeat i -> V [i] for)
    0 -> sum;
    (for i : V.range repeat sum + v [i] -> sum for)
#)

It is possible to overcome the limitations of the for index structure (integer indices which always start at one and increment by one) using other patterns. That capability is not explored in this introductory article.

If Statement

The BETA if statement is an unusual combination of a traditional if statement and a case statement. Its form is
(if E0
    // E1 then I1
    // E2 then I2
        . . .
    //En then In
    else I
if)

E1 . . . En are evaluations and I1 . . . In are imperatives. The else clause is optional. Here's an example of a simple if statement:

(if x
    // 17 then . . .
    // 33 then . . .
    // y+3 then . . .
    else
if)

A boolean evaluation (albeit an awkward one) might be written

(if (x > 0) and (y < 0)
    // True then . . .
    // False then . . .
if)

Evaluations

BETA evaluation (assignment) statements are very flexible. You can define multiple assignment statements such as
   3 -> I -> J

You can also combine multiple assignments with pattern executions and enter and exit redirection like in this program:

   (#  Power :     (* compute X^n where n > 0 *)
        (#  X, Y : @ real; n : @ integer;
        enter (X, n) 
        do  1 -> Y;
            (for i : n repeat Y * X -> Y for)
        exit Y
        #)

        Reciproc :  (* compute (Q, 1/Q) *)
        (# Q, R : @ real;
        enter Q
        do  (if (Q // 0) then 0 -> R
            else (1 div Q) -> R
            if )
        exit (Q, R)
        #);
    A, B : @ real;
    do  (3.14, 2) -> &Power -> &Reciproc -> (A, B);
        (* A = 3.14 ^ 2, B = 1/A *)
    #)

THE MJOLNER BETA SYSTEM

So far I have described the more basic elements of the BETA language. There are many advanced capabilities, such as subpatterns and virtual patterns, exception handling, and concurrency, that really show off BETA's power as an object-oriented language and the depth of its design. I''ll cover these topics in a future article.

The Mjolner BETA System, created by several of the language's original designers, is currently the only commercial implementation of a BETA development environment. The Mjolner BETA System includes:

  • native code generation,
  • automatic garbage collection and storage management,
  • separate compilation of program fragments with automatic dependency analysis,
  • interfaces to C and assembly language modules (and Pascal on the Mac),
  • persistent objects, although not a full-blown object-oriented database (a complete OODB is expected by late 1993),
  • basic patterns for simple data types,
  • a set of container patterns for more complex data structures (including sets, has tables, stacks, queues, and lists),
  • stream patterns for text and file handling,
  • process management and concurrency control patterns, and
  • application frameworks for X Windows, Motif, and the Macintosh Toolbox.

As if that weren't enough, Mjolner also sells a variety of additional tools including a modifiable Hyper Structure Editor, a metaprogramming system, a BETA CASE Tool (Unix only), and a source-level debugger (Unix only). In the coming months we hope to present an overview of BETA's advanced features, a comprehensive review of Mjolner's BETA System and tools, and advanced programming examples. Let us know if there are specific topics you would like addressed. -

MADA is pleased to announce that as we were going to press with this issue, Mjolner selected MADA as their exclusive US and Canada distributor for the Macintosh version of BETA. We are also carrying the reset of the Mjolner BETA product line. See page 67 for more details.

In addition, a demo version of the Mjolner BETA System is available on MADA's "Five Years of Objects" CD-ROM.

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Air Video Server HD 2.1.0 - Stream video...
Air Video Server HD streams videos instantly from your computer on your iPhone, iPad, iPod touch or Apple TV. No need to worry about converting or transferring files. We took everything that was... Read more
Duplicate Annihilator 5.7.5 - Find and d...
Duplicate Annihilator takes on the time-consuming task of comparing the images in your iPhoto library using effective algorithms to make sure that no duplicate escapes. Duplicate Annihilator... Read more
BusyContacts 1.0.2 - Fast, efficient con...
BusyContacts is a contact manager for OS X that makes creating, finding, and managing contacts faster and more efficient. It brings to contact management the same power, flexibility, and sharing... Read more
Capture One Pro 8.2.0.82 - RAW workflow...
Capture One Pro 8 is a professional RAW converter offering you ultimate image quality with accurate colors and incredible detail from more than 300 high-end cameras -- straight out of the box. It... Read more
Backblaze 4.0.0.872 - Online backup serv...
Backblaze is an online backup service designed from the ground-up for the Mac.With unlimited storage available for $5 per month, as well as a free 15-day trial, peace of mind is within reach with... Read more
Little Snitch 3.5.2 - Alerts you about o...
Little Snitch gives you control over your private outgoing data. Track background activity As soon as your computer connects to the Internet, applications often have permission to send any... Read more
Monolingual 1.6.4 - Remove unwanted OS X...
Monolingual is a program for removing unnecesary language resources from OS X, in order to reclaim several hundred megabytes of disk space. If you use your computer in only one (human) language, you... Read more
CleanApp 5.0 - Application deinstaller a...
CleanApp is an application deinstaller and archiver.... Your hard drive gets fuller day by day, but do you know why? CleanApp 5 provides you with insights how to reclaim disk space. There are... Read more
Fantastical 2.0 - Create calendar events...
Fantastical is the Mac calendar you'll actually enjoy using. Creating an event with Fantastical is quick, easy, and fun: Open Fantastical with a single click or keystroke Type in your event details... Read more
Cocktail 8.2 - General maintenance and o...
Cocktail is a general purpose utility for OS X that lets you clean, repair and optimize your Mac. It is a powerful digital toolset that helps hundreds of thousands of Mac users around the world get... Read more

Pie In The Sky: A Pizza Odyssey (Games)
Pie In The Sky: A Pizza Odyssey 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: A game about delivering pizza. In space. | Read more »
Android's Popular OfficeSuite Now A...
Once only available for Android devices, OfficeSuite has finally landed on the app store. The Mobile Systems app lets you view, edit, create, and share Word, Excel, and PowerPoint documents as well as convert them to/from PDFs. It's touted as being... | Read more »
Fast & Furious: Legacy's Creati...
| Read more »
N-Fusion and 505's Ember is Totally...
| Read more »
These are All the Apple Watch Apps and G...
The Apple Watch is less than a month from hitting store shelves, and once you get your hands on it you're probably going to want some apps and games to install. Fear not! We've compiled a list of all the Apple Watch apps and games we've been able to... | Read more »
Appy to Have Known You - Lee Hamlet Look...
Being at 148Apps these past 2 years has been an awesome experience that has taught me a great deal, and working with such a great team has been a privilege. Thank you to Rob Rich, and to both Rob LeFebvre and Jeff Scott before him, for helping me... | Read more »
Hands-On With Allstar Heroes - A Promisi...
Let’s get this out of the way quickly. Allstar Heroes looks a lot like a certain other recent action RPG release, but it turns out that while it’s not yet available here, Allstar Heroes has been around for much longer than that other title. Now that... | Read more »
Macho Man and Steve Austin Join the Rank...
WWE Immortals, by Warner Bros. Interactive Entertainment and WWE, has gotten a superstar update. You'll now have access to Macho Man Randy Savage and Steve Austin. Both characters have two different versions: Macho Man Randy Savage Renegade or Macho... | Read more »
Fearless Fantasy is Fantastic for the iF...
I actually had my first look at Fearless Fantasy last year at E3, but it was on a PC so there wasn't much for me to talk about. But now that I've been able to play with a pre-release version of the iOS build, there's quite a bit for me to talk... | Read more »
MLB Manager 2015 (Games)
MLB Manager 2015 5.0.14 Device: iOS Universal Category: Games Price: $4.99, Version: 5.0.14 (iTunes) Description: Guide your favorite MLB franchise to glory! MLB Manager 2015, officially licensed by MLB.com and based on the award-... | Read more »

Price Scanner via MacPrices.net

Apple offering refurbished 27-inch 5K iMacs f...
The Apple Store is offering Apple Certified Refurbished 27″ 3.5GHz 5K iMacs for $2119 including free shipping. Their price is $380 off the price of new models, and it’s the lowest price available for... Read more
16GB iPad mini on sale for $199, save $50
Walmart has 16GB iPad minis (1st generation) available for $199.99 on their online store, including free shipping. Their price is $50 off MSRP. Online orders only. Read more
New 128GB MacBook Airs on sale for $50 off MS...
 B&H Photo has 128GB 11″ and 13″ 2015 MacBook Airs on sale today for $50 off MSRP including free shipping plus NY sales tax only: - 11″ 1.6GHz/128GB MacBook Air (Model #MJVM2LL/A): $849 $50 off... Read more
13-inch 2.6GHz Retina MacBook Pro (refurbishe...
The Apple Store has Apple Certified Refurbished 13″ 2.6GHz/128GB Retina MacBook Pros available for $979 including free shipping. Original MSRP for this model was $1299. Read more
Save up to $600 with Apple refurbished Mac Pr...
The Apple Store is offering Apple Certified Refurbished Mac Pros for up to $600 off the cost of new models. An Apple one-year warranty is included with each Mac Pro, and shipping is free. The... Read more
Samsung Galaxy S 6 and Galaxy S 6 edge U.S. P...
Samsung Electronics America, Inc. has announced the Galaxy S 6 and Galaxy S 6 edge will be available in the U.S. beginning April 10, with pre-orders being accepted now. “We have completely reimagined... Read more
13-inch 2.5GHz MacBook Pro (refurbished) avai...
The Apple Store has Apple Certified Refurbished 13″ 2.5GHz MacBook Pros available for $829, or $270 off the cost of new models. Apple’s one-year warranty is standard, and shipping is free: - 13″ 2.... Read more
Save up to $80 on iPad Air 2s, NY tax only, f...
 B&H Photo has iPad Air 2s on sale for $80 off MSRP including free shipping plus NY sales tax only: - 16GB iPad Air 2 WiFi: $469.99 $30 off - 64GB iPad Air 2 WiFi: $549.99 $50 off - 128GB iPad... Read more
iMacs on sale for up to $205 off MSRP
B&H Photo has 21″ and 27″ iMacs on sale for up to $205 off MSRP including free shipping plus NY sales tax only: - 21″ 1.4GHz iMac: $1019 $80 off - 21″ 2.7GHz iMac: $1189 $110 off - 21″ 2.9GHz... Read more
Färbe Technik Offers iPhone Battery Charge LI...
Färbe Technik, which manufactures and markets of mobile accessories for Apple, Blackberry and Samsung mobile devices, is offering tips on how to keep your iPhone charged while in the field: •... Read more

Jobs Board

DevOps Software Engineer - *Apple* Pay, iOS...
**Job Summary** Imagine what you could do here. At Apple , great ideas have a way of becoming great products, services, and customer experiences very quickly. Bring Read more
*Apple* Retail - Multiple Positions (US) - A...
Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, you're also the Read more
Sr. Technical Services Consultant, *Apple*...
**Job Summary** Apple Professional Services (APS) has an opening for a senior technical position that contributes to Apple 's efforts for strategic and transactional Read more
Lead *Apple* Solutions Consultant - Retail...
**Job Summary** Job Summary The Lead ASC is an Apple employee who serves as the Apple business manager and influencer in a hyper-business critical Reseller's store Read more
*Apple* Pay - Site Reliability Engineer - Ap...
**Job Summary** Imagine what you could do here. At Apple , great ideas have a way of becoming great products, services, and customer experiences very quickly. Bring Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.