Print Page - Bare-Bones Oxygen Compiler

Programming => Example Code => Utility => Topic started by: Charles Pegge on July 25, 2013, 01:55:34 AM

Title: Bare-Bones Oxygen Compiler
Post by: Charles Pegge on July 25, 2013, 01:55:34 AM

This requires Oxygen.dll to be in the same folder and inc/RTL32.inc

It reads source code from t.o2bas and compiles to t.exe

You can add code to the start of the source string, followed by a page-feed character (ascii 12). This invisible portion of the source code will then be excluded from line numbering.

  $filename "co2a.exe"
  librarypath "$\"
  includepath "$\inc\"
  include "RTL32.inc"

  extern lib "oxygen.dll"
  ! o2_mode (sys m)
  ! o2_basic (string s)
  ! o2_exec (optional sys p) as sys
  ! o2_error () as string
  ! o2_errno () as sys
  end extern

  o2_mode 9 'ascii=1 bstring=8

  f="t.o2bas"
  cr=chr(13,10)
  s=`includepath "$\inc\"`+cr+
  `%filename "t.exe"`+cr+
  `include "RTL32.inc"`+cr+chr(12)+
  getfile f
  o2_mode 9 'ascii=1 bstring=8
  o2_basic s
  if o2_errno
   print o2_error
  end if

Title: Re: Bare-Bones Oxygen Compiler
Post by: kryton9 on July 26, 2013, 05:06:49 PM

Quote

This invisible portion of the source code will then be excluded from line numbering.

I am not sure I understand what this is for Charles. I guess I could experiment to figure it out.

Title: Re: Bare-Bones Oxygen Compiler
Post by: Charles Pegge on July 27, 2013, 01:25:51 AM

Hi Kent,

This is the simplest form of Oxygen compiler. Could be the basis of a customised basic, by adding prefix code, and preprocessor parsing.

Title: Re: Bare-Bones Oxygen Compiler
Post by: Aurel on July 27, 2013, 04:15:43 AM

Quote

by adding prefix code

Charles
when you say prefix what you mean...

!myPrint {arg,arg}
#myprint

something like this?
or something different ???

Title: Re: Bare-Bones Oxygen Compiler
Post by: Charles Pegge on July 27, 2013, 06:22:11 AM

I mean equates, directives and include files, preprocessing for customised syntax. Creating a KrytonBasic possibly :)

Title: Re: Bare-Bones Oxygen Compiler
Post by: kryton9 on July 27, 2013, 05:20:51 PM

It will be fun testing it out. Thanks!

Title: Re: Bare-Bones Oxygen Compiler
Post by: JRS on July 27, 2013, 07:27:06 PM

Kent,

Maybe it would be fun to convert the MY-BASIC (http://www.allbasic.info/forum/index.php?topic=221.0) interpreter to work with O2.

John

Title: Re: Bare-Bones Oxygen Compiler
Post by: Aurel on July 27, 2013, 09:38:30 PM

Quote

Maybe it would be fun to convert the MY-BASIC interpreter to work with O2

Yes John..,this would be very interesting ;)

Title: Re: Bare-Bones Oxygen Compiler
Post by: Peter on July 28, 2013, 07:56:51 AM

Quote

Maybe it would be fun to convert the MY-BASIC interpreter to work with O2.

Is it a China joke? :D

Title: Re: Bare-Bones Oxygen Compiler
Post by: Aurel on July 28, 2013, 08:50:40 AM

Quote

Is it a China joke?

No is not...
because there is no fortune coockie ;D

Title: Re: Bare-Bones Oxygen Compiler
Post by: JRS on July 28, 2013, 09:53:58 AM

(http://3.bp.blogspot.com/-msVjlqFOVdw/UIUw5mEcwsI/AAAAAAAACpE/LFliICRo1u8/s1600/fortune-cookie-believe.jpg)

Title: Re: Bare-Bones Oxygen Compiler
Post by: kryton9 on July 28, 2013, 11:44:12 AM

Quote from: JRS on July 27, 2013, 07:27:06 PM

Kent,

Maybe it would be fun to convert the MY-BASIC (http://www.allbasic.info/forum/index.php?topic=221.0) interpreter to work with O2.

John

Nice looking project John. I need a compiled language since I want to work with 3D graphics. But as with anyone who asks me what to learn with, I will add this to my list of recommendations!

Title: Re: Bare-Bones Oxygen Compiler
Post by: JRS on July 28, 2013, 01:15:48 PM

The idea was to use MY-BASIC as an embedded scripting engine in OxygenBasic as it's host. The embedding and language expansion API for MY-BASIC is really easy to use. If you have any interest in ScriptBasic for embedding, trying MY-BASIC first would make the SB embedding a lot easier on you.

Title: Re: Bare-Bones Oxygen Compiler
Post by: Frankolinox on July 29, 2013, 06:08:33 AM

how does charles utility for compiling works ;)
1) main code

Code: [Select]

  '
  ' test compiling by oxygen
  '
  $filename "myO2compile.exe"
  librarypath "$\"
  includepath "$\inc\"
  include  "RTL32.inc"

  extern lib "oxygen.dll"
  ! o2_mode  (sys m)
  ! o2_basic (string s)
  ! o2_exec  (optional sys p) as sys
  ! o2_error () as string
  ! o2_errno () as sys
  end extern

  o2_mode 9 'ascii=1 bstring=8

  f="test_compile_o2.o2bas"
  cr=chr(13,10)
  s=`includepath "$\inc\"`+cr+
  `%filename "testO2.exe"`+cr+
  `include "RTL32.inc"`+cr+chr(12)+
  getfile f
  o2_mode 9 'ascii=1 bstring=8
  o2_basic s
  print s
  if o2_errno
    print o2_error
  end if
  print "now you push execute testo2.exe"

2) source code for loading:

Code: [Select]

' test_compile_o2.o2bas

type mydatatype
  string name
  int      n
  single  x,y
end type

mydatatype d[10]={
"thor",2,100,100,
"hulk",2,100,150,
"x-men",4,100,250,
"ironman",3,100,570}

i=3
print d[ i ].name "  " d[ i ].n "  " d[ i ].x "," d[ i ].y

3) "myO2compile.exe" produce a new "testO2.exe" where you can see source code (my idea) and execute it.

for testing see in my zip folder.

best regards, frank

X

Title: Re: Bare-Bones Oxygen Compiler
Post by: kryton9 on July 29, 2013, 12:39:14 PM

Frank, I thought this would fix it, but I too can't get it to work. Charles is going to have step in and correct the example you nicely provided.

Code: OxygenBasic

type mydatatype
  string name
  int      n
  single  x,y
end type
 
mydatatype d[10]={
"thor",2,100,100,
"hulk",2,100,150,
"x-men",4,100,250,
"ironman",3,100,570}
 
'You can add code to the start of the source string, followed by a page-feed character (ascii 12). This invisible portion of the source code will then be excluded from line numbering.
' I just added this line.
chr(12)
 
i=3
print d[ i ].name "  " d[ i ].n "  " d[ i ].x "," d[ i ].y

Title: Re: Bare-Bones Oxygen Compiler
Post by: Charles Pegge on July 29, 2013, 08:17:08 PM

Hi Guys,

You will need to run this micro-compiler in the Oxygen root directory. There it should work.

Oxygen Basic

Programming => Example Code => Utility => Topic started by: Charles Pegge on July 25, 2013, 01:55:34 AM