Alsys Adaworld problems - please help (long)

Alsys Adaworld problems - please help (long)

[Brett Bolen]

Greetings,

  I have a problem with Alsys Adaworld ver 5.1 host=>dos, target=>dos
compiler.  I've talked to support, but they aren't responding ( it's
been two weeks).  If someone could help me I'd be really happy.

I've included some email that I sent to support@alsys.com ( or 
whatever it is).  I'm supposed to get an update to 5.1.3 RSN.

I'd like to here what other Adaworld users think of it.

thanks
   b\253 ( Brett Bolen )
   brettb@tas.com

email to me or post if you think it may be benificial.

---------------------------------------- email follows.
Hello xxxx,

Glad to have talked to you this morning.  Included are the files we
discussed earler.

Recaping the problems

   1.  alsys 5.1 adaworld
          bind failes after compile
          typeing 'fastlink' at dos prompt gives same error
          error reported is
             "bug allocating 5d4d para..."
          If tsr is loaded then same error but different number
             of paragraphs requested
          tested on dos 6.0 with and without himem.sys

   2.  Alsys 5.1.1 adaworld
          
         A. Size increased from 200k to 360k.  why?
         B. 'alarm interrupt' failes.
                works is in 5.1
                hooks int70 ( IRQ8)
                programmed at 16hz ( not 1024hz)
                isr simplified to increment a variable ( hardly
                    any processing)
                we know that something changed with phar-lap here,
                    because they remapped irq0-7 from int78-80 to 
                    int8-f
                run-time error
                    'abnormal program termination: Stack fault ..CS:EIP=..'
                'my_main_program' example on page 186 in system_specific
                     manual works.
          C.  make fails
                we have ~25 packages and 250 files ( almost all
                   functions/procedures are seperate)
                if no modules are in the library, then 'ada w.m' works
                after first successfull make ( 'ada i css_main.inv')
                   make always fails.
                error reported
                   'error: 'make' is not a command
                    **** Unrecovered error in 'adaworld.def at line 18'
                sometimes gives
                   'AdaMake fails due to internal error' also/besides
                 'ada w.m root=hello' works for simple hello program
                 'ada w.m root=hello2'  did not work for same program
                     with a single 'with' statement which brings
                     in some of our app
                 after failure we've run norton quick unerase on
                     adaworld.def and found that when it works
                     there is nothing after the 'quit;' line in
                     adaworld.def,  these lines are derived
                     in information from ada.ini. I've included
                     two adaworld.def ( one works, and one fails), 
                     and the ada.ini file. These lines are 
                     flagged in the ada.ini listing below.
                 tried with msdos6.0 and msdos6.22, on a 386dx25
                     and a 486dx266 with same results.

   3.  When will I receive the compile update.

          If the now compiler fixes these problems, then I'll use
          it, and bury these problems.



thx
  b\253             

------------------------------------------ ada.ini
  
-- This file sets up some general defaults and all of the defaults for
-- the COMPILE and BIND commands.

WORKBENCH.DEFAULT.MAKE SOURCES => "*.ADA"     <-- trouble1
WORKBENCH.DEFAULT.MAKE ROOT    => css_main    <-- trouble2
WORKBENCH.DEFAULT.MAKE BIND    => YES         <-- trouble3
DEFAULT                LIBRARY => lib         <-- trouble4
DEFAULT                FAMILY  => CSS
DEFAULT                MODE    => UPDATE

GLOBAL.FILE            WIDTH   => 132
GLOBAL.FILE            LENGTH  => 55

DEFAULT.COMPILE LIBRARY     => lib

default.compile annotate    => no_value
default.compile errors      => 50
default.compile level       => update
default.compile checks      => all
default.compile generics    => inline
DEFAULT.COMPILE TASKING     => yes
default.compile memory      => 500

default.compile output      => automatic
default.compile warning     => yes
default.compile text        => no
DEFAULT.COMPILE SHOW        => ALL
default.compile detail      => yes
default.compile assembly    => none

default.compile stack       => 20480

default.compile calls       => normal
default.compile reduction   => none
default.compile expressions => none

DEFAULT.COMPILE COPY        => YES
DEFAULT.COMPILE DEBUG       => YES
default.compile tree        => no


DEFAULT.BIND    LIBRARY    => lib

default.bind    level      => link
default.bind    execution  => protected
default.bind    float      => automatic
default.bind    mathlib    => i387
default.bind    object     => automatic
default.bind    uncalled   => remove
default.bind    timer      => normal
default.bind    slice      =>   0

DEFAULT.BIND    MAIN       => 256
default.bind    task       =>   2
default.bind    history    => yes

default.bind    size       =>  64
default.bind    increment  =>  64

DEFAULT.BIND    DIRECTIVES => -PACK
default.bind    modules    => no_value
default.bind    search     => no_value

default.bind    output     => automatic
DEFAULT.BIND    DATA       => ALL
default.bind    warning    => yes

DEFAULT.BIND    DEBUG      => YES
default.bind    tune       => no
========================================================= end of file




------------------------------------ an adaworld.def which fails (always)
GLOBAL;
TERMINAL (WIDTH  => 79,
          LENGTH => 24);
FILE (WIDTH  => 80,
      LENGTH => 55);
KEYBOARD (UPPER_COMMAND            => "U",
          LOWER_COMMAND            => "L",
          NEXT_CHARACTER           => "N",
          PREVIOUS_CHARACTER       => "P",
          DELETE_CURRENT_CHARACTER => "D",
          END_OF_LINE              => "E",
          BEGINNING_OF_LINE        => "B",
          REFRESH                  => "R",
          TOGGLE_FOR_INSERT        => "T",
          OPTIONS                  => (HISTORY_SIZE => 20,
                                       INSERT_MODE  => YES));
QUIT;
DEFAULT.MAKE (LIBRARY => "lib");     <- line that causes trouble
========================================================= end of file


------------------------------------ an adaworld.def which works ( sometimes)
GLOBAL;
TERMINAL (WIDTH  => 79,
          LENGTH => 24);
FILE (WIDTH  => 80,
      LENGTH => 55);
KEYBOARD (UPPER_COMMAND            => "U",
          LOWER_COMMAND            => "L",
          NEXT_CHARACTER           => "N",
          PREVIOUS_CHARACTER       => "P",
          DELETE_CURRENT_CHARACTER => "D",
          END_OF_LINE              => "E",
          BEGINNING_OF_LINE        => "B",
          REFRESH                  => "R",
          TOGGLE_FOR_INSERT        => "T",
          OPTIONS                  => (HISTORY_SIZE => 20,
                                       INSERT_MODE  => YES));
QUIT;
========================================================= end of file


.fin

-- 
|----------------------------------------------------------------------|
|                                                          Brett Bolen |
|----------------------------------------------------------------------|