Post Reply 
Support for comments /* ... */
02-24-2017, 05:36 PM (This post was last modified: 02-24-2017 06:05 PM by compsystems.)
Post: #1
Support for comments /* ... */
Hello

One way to better visualize a code, where a function has several arguments (for example input( arg1, arg2, ..., argn), is to write each argument in a separate line

input
(
arg1,
arg2,
...,
argn
);

But if you want to comment with // the code generates error, because the comment covers until the end of the sentence (; ), for this we need comments of the form / * * /

PHP Code:
export testInputList()
begin
    local a
bc;
    
local resetVAL_aresetVAL_bresetVAL_c;
    
local initVAL_ainitVAL_binitVAL_c;

    
initVAL_a:={1}; initVAL_b:={2}; initVAL_c:={3}; 
    
resetVAL_a:={}; resetVAL_b:={}; resetVAL_c:={}; 
    
    
local ObjectType_AllAllowed := -1;
    
local ObjectType_Real := 0;
    
local ObjectType_Integer := 1;
    
local ObjectType_String := 2;  
    
local ObjectType_Complex := 3;  
    
local ObjectType_Matrix := 4;
    
local ObjectType_List := 6;
    
local ObjectType_Function := 8;  
    
local ObjectType_Unit := 9;  
    
local ObjectType_CAS := 14;

    
local ObjectType := ObjectType_List;
    
local title;

    case
        if 
ObjectType == -1 then title:="Type Allow: "+"Alls" end;
        if 
ObjectType == 0 then title:="Type Allow: "+"Real" end;
        if 
ObjectType == 1 then title:="Type Allow: "+"Integer" end;
        if 
ObjectType == 2 then title:="Type Allow: "+"String" end;  
        if 
ObjectType == 3 then title:="Type Allow: "+"Complex" end;  
        if 
ObjectType == 4 then title:="Type Allow: "+"Matrix" end;
        if 
ObjectType == 6 then title:="Type Allow: "+"List" end;
        if 
ObjectType == 8 then title:="Type Allow: "+"Function" end;  
        if 
ObjectType == 9 then title:="Type Allow: "+"Unit" end;  
        if 
ObjectType == 14 then title:="Type Allow: "+"CAS" end;
     default
        
title:="Type Allow: "+"?"
     
end;

    
local ok := 1;
    
local cancel := 0;
    
local keyPressedOnMenu := 0;
    
keyPressedOnMenu := input 
    
(  
        { 
         {
a, [ObjectType] }, 
         {
b, [ObjectType] },
         {
c, [ObjectType] }

        }, 
        
title,
        { 
"label_a""label_b","label_c" }, 
        { 
"help_a""help_b""help_c" },           
        { 
resetVAL_aresetVAL_bresetVAL_c }, 
        { 
initVAL_ainitVAL_binitVAL_c 
    );
    if 
keyPressedOnMenu == ok then
        
return ({abc});  
    else
        return 
"Done";
    
end;
end

Successful compilation
But not with

PHP Code:
INPUT
(   
       ...    
       { 
"help_a""help_b""help_c" },           
        
//{ resetVAL_a, resetVAL_b, resetVAL_c }, 
       //{ initVAL_a, initVAL_b, initVAL_c } 
); // end input 

The problem would be solved in the following way

PHP Code:
INPUT
(   
       ...    
       { 
"help_a""help_b""help_c" },           
        
/* { resetVAL_a, resetVAL_b, resetVAL_c },  */
        /* { initVAL_a, initVAL_b, initVAL_c } */
); 
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
Support for comments /* ... */ - compsystems - 02-24-2017 05:36 PM



User(s) browsing this thread: 2 Guest(s)