PureBasic Forums - English

UncleBen wrote:simple macro:
to replace [...something...] to [...otherthing...]
":Endif" replace "Endif"

Code: Select all

Macro Endif
    :Endif
EndMacro

This trying to macro some "Keywords", this give compiler error.

Error message wrote:A macro can't have the same name as a keyword: EndIf.

UncleBen wrote:Change "{" to ":"

Code: Select all

Macro {
   :
EndMacro

It didn't work, any one mind to tell the work around ? thanks anyway

Little John wrote:

UncleBen wrote: A macro can't have the same name as a keyword: EndIf.

I don't know where this is officially documented, but I think macro names (like any other identifiers in PB) can only contain digits 0-9 (not at the beginning), characters A-Z, a-z, and "_".

Macro REM
  ;
EndMacro

Macro THEN
  :
EndMacro

Macro EndIf
  :EndIf
EndMacro

Macro {
  :
EndMacro

Macro }
  Wend
EndMacro

REM *** This example try to illustrate the power and flexibility of Macro preprocessor
REM *** unfortunately , ONLY the second Macro works
  
  
REM single Line If ...THEN ....  
  
If a=b THEN c=d+e EndIf


While a=b 
  {
  c=d+e
  dosomething()
  }
  

  Macro SUB
      Procedure
  EndMacro
  
  Macro ENDSUB
      EndProcedure
  EndMacro  

SUB dosomething()
   a=b+2
   c=a+d
   Procedurereturn c
ENDSUB

G=dosomething()

Little John wrote:You posted this in the "Bugs - Documentation" subforum.
So what exactly is the bug in the documentation that you want to report?

[Macro] Not sure is this a bug or feature

Macros


Syntax
Macro <name> [(Parameter [, ...])]
...
EndMacro

Description

Macros are a very powerful feature, mainly useful for advanced programmers. A macro is a placeholder for some code (one keyword, one line or even many lines), which will be directly inserted in the source code at the place where a macro is used. In this, it differs from procedures, as the procedures doesn't duplicate the code when they are called.

The Macro : EndMacro declaration must be done before the macro will be called for the first time. Because macros will be completely replaced by their related code at compile time, they are not local to a procedure.

A macro can not have a return type nor typed parameters. When a macro has some parameters, they are replaced in the macro code by the literal expression which is passed to the called macro. No evaluation is done as this stage, which is very important to understand: the evaluation of a line is started once all the macros found on this line are expanded.

The macros are divided into two categories: simple (without parameters) and complex (with parameters, needs the parentheses when calling it). When using no parameters, it's possible to replace any word with another word (or any expression). The macros can be used recursively, but if the parameter passed contain the concatenation character '#', it won't be expanded.

;replace whatever given to new
MacroReplace whatever
   Newtext;including this comment,this line doesn't check syntax ,this is waht macro do 
EndMacro

;with parameter
Macro newfunction(a,b)
      syntax(a)
      syntax(b)
      syntax(a,b)
EndMacro

Danilo wrote:PB Style:

Code: Select all

Macro Then(_stmt1_=,_stmt2_=,_stmt3_=,_stmt4_=,_stmt5_=,_stmt6_=,_stmt7_=,_stmt8_=,_stmt9_=,_stmt10_=)
  : _stmt1_ : _stmt2_ : _stmt3_ : _stmt4_ : _stmt5_ : _stmt6_ : _stmt7_ : _stmt8_ : _stmt9_ : _stmt10_ : EndIf
EndMacro

Macro Do(_stmt1_=,_stmt2_=,_stmt3_=,_stmt4_=,_stmt5_=,_stmt6_=,_stmt7_=,_stmt8_=,_stmt9_=,_stmt10_=)
  : _stmt1_ : _stmt2_ : _stmt3_ : _stmt4_ : _stmt5_ : _stmt6_ : _stmt7_ : _stmt8_ : _stmt9_ : _stmt10_ : Wend
EndMacro

Macro Comment(_text_) : : : EndMacro
Macro REM(_text_)     : : : EndMacro

;--------------------------------------------------

REM( single Line If ...THEN .... )

If a=b Then( c=d+e )

If a=0
    Then( Debug "a=0", a+1 )

Debug "---"

While a < 10 Do( a+1, Debug a)

Debug "---"

While a > 0
    Do( a-1, Debug a)


Debug "---"

luis wrote:Do you like that ?

Even using REM like a function with text as its param ? Looks pretty ugly yo me.

It's not exactly replacing ";" with "REM"

Or multiple lines which would go inside an IF/ENDIF block now on a single line separated by commas ?

I thought you were not looking for something like that. Why do you want to hurt yourself and add limitations not present in the language ?

But .... "de gustibus non est disputandum", so ...OK !

You'll have to expand the macros if you'll ever have to post a question in the forum because that's not PB syntax anymore. I think it would be worth the effort to learn to use PB as it is.

But it's just my opinion.

UncleBen wrote: But , i love his effort and brave to code this idea !

UncleBen wrote: P/S: one way to satisfy myself may be is to custom a pre-proccesor , but not really want that path.

UncleBen wrote: i just need the direct replacement without parsing, i thought macro will do the job. but it doesn't (for now)